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1. ABSTRACT 

The PDP-9 Basic Exerciser is designed to exercise the CP, core memory and I/O devices as- 
sociated with a basic PDP-9 configuration. Once initiated, the program will perform tests on all operate 
and memory reference instructions, tests on the adder, memory checkerboard patterns, tests on the real- 
time clock, punch, reader, Teletype and program interrupt. 

The Basic Exerciser contains a condensed version of the PDP-9 Instruction Test, Parts 1 and 2, 
and a memory checkerboard test similar to the PDP-9 Basic Memory Checkerboard Test. These tests run 
continuously, and are interrupted by the punch, reader or Teletype at a device rate. The real-time 
clock will interrupt and suspend all operations at random time intervals. The instruction test or I/O 
device resumes operation after the clock interrupt has been serviced. 

Nine ACS functions are provided to enable the operator to (1) inhibit the instruction and 
memory tests and run the real-time clock, program interrupt, and the punch, read, print sequence alone; 
(2) inhibit program interrupts and run the instruction and memory tests alone; (3) loop continuously on 
the adder test; (4) loop continuously on the memory checkerboard test; (5) inhibit program relocation; 

(6) inhibit the real-time clock, but continue testing with program interrupt and ail other devices enabled; 

(7) run the instruction and memory tests, and the clock and punch with the read and print sequence in- 
hibited; (8) run the reader, real-time clock and instruction and memory tests with the punch and Teletype 
inhibited; (9) run the read and print sequence, real-time clock and instruction and memory tests with the 
punch inhibited. 

2. REQUIREMENTS 

2.1 Equipment 

A basic PDP-9 configuration. 

2.2 Storage 

The program requires all 8K of core memory to perform all tests. The program initially resides 
in memory locations 00000 to 7730. When the program is relocated to the higher 4K field, it occupies 
locations 10022 to 17730. 

3. LOADING PROCEDURE 

The tape supplied is punched in the HRI mode. 

a . Set the ADDRESS switches to 00000 . 

b. Place all AC switches down. 



c. Place the HRI tape in the reader. 

d. Press I/O RESET, and then READ-IN. 
The program is not self-starting. 

4. STARTING PROCEDURE 

4.1 Starting Addresses 

22 or 10022 if the program is currently in the upper 4K field. 

4.1 .1 Restarting Addresses - 26 or 10026 if the program is currently in the upper 4K field. 

4.2 Operator Action 

a. Set the ADDRESS switches to 22. 

b. Place all ACS down for normal program operation. See paragraph 5.1 for use of 
the ACS to inhibit certain portions of the program. 

c. Press I/O RESET, and then START. 

d. Approximately 3-1/2 feet of leader will be punched. This leader is blank except 
for one frame which has all channels punched. 

e. Place the punched frame directly over the reader drive sprocket, and position the 
tape between reader and punch for minimum binding. 

f. Press CONTINUE. 

g. The program will run until an error halt occurs, or manually stopped by the operator. 
h. Steps c through f above are similar to the procedure performed with the PDP-9 punch 

test. 

4.2.1 Restarting Procedure - 

a. Set the ADDRESS switches to 26. 

b. Place all ACS down for normal program operation. See paragraph 5.1 for use of 
the ACS to inhibit certain portions of the program. 

c. If the punch, read and print sequence is not inhibited, make sure there is tape in the 
reader. The tape does not have to be blank leader when restarting. 

d. Press I/O RESET, and then START. 

e. The program will run until an error halt occurs, or manually stopped by the operator. 



5.1 



OPERATING PROCEDURE 



Operational Switch Settings 



Normal program operation is achieved by placing all ACS down before starting from loca- 
tions 22 or 26. 

The operator is provided- nine options with which to modify the operation of the program. 
These may be selected by placing any one or a combination of ACS through 8 up before starting from 
locations 22 or 26. 

To make changes in the ACS settings, the program must be stopped by the operator before the 
changes are made. The program must then be restarted from location 26 (or 22 if new leader is desired). 
The program may not recognize the new ACS settings if the above procedure is not followed. 

ACS Functions 



(1 



1 (1 



2 (1 



3 

4 

5 
6 



Run only the punch, read and print sequence plus the real-time clock. Program interrupt 
will be enabled. 

Inhibit the punch, read and print sequence. Program interrupt is disabled. The real- 
time clock is on. The complete instruction test and memory checkerboard test will be 
performed. , 

Loop continuously on the "add random pairs" test. The real-time clock, punch, read 
and print sequence plus program interrupt will be enabled unless specified otherwise by 
an ACS. 

Loop continuously on the memory checkerboard test. Program relocation will not take 
place. Program action otherwise is the same as that described for ACS 2. 

Inhibit program relocation. Unless otherwise specified, the program will run in a normal 
way, but will not relocate from its current 4K field location to the opposite field after 
completing the memory checkerboard test. 

Inhibit clock. Unless otherwise specified, program action is normal except that the 
clock should always be off. 

Inhibit the reader and TTY. The punch will run continuously. Tape must be in the reader 
to prevent the no-tape indicator from being set. Program action is normal unless other- 
wise specified. 

Inhibit the punch and TTY. The reader will run continuously. A loop or fan-fold tape 
with any data may be used. Program action is normal unless otherwise specified. 

Inhibit the punch. The reader will read 52 characters at full speed and then halt. The 
TTY will then print the 52 characters read. Any tape loop or fan-fold tape may be used. 
Program action is normal unless otherwise specified. 



Any combination of the nine ACS may be used, as long as the operations do not conflict; i.e., 
if ACS 2 and 3 are both up, the add random pairs test would be looped. Memory checkerboard would 
not be run unless the program is restarted with ACS 3 alone. 



The I/O devices may be controlled with several combinations of ACS 6, 7 and 8. If ACS 7 
and 8 are both up the reader will run continuously, as if ACS 7 only were up. If ACS 6 and 7 or 6 and 
8 are up, all devices will be inhibited. Program interrupt and the real-time clock will be enabled unless 
otherwise specified. 

5.2 Subroutine Abstracts 

The PDP-9 Basic Exerciser may be thought of as three separate programs; i.e., the instruction 
and memory tests; punch, read and print sequence, and operation of the real-time clock. The instruction 
and memory tests will be interrupted, at a device rate, by the punch, reader or Teletype. The clock 
will randomly interrupt any of the above operations at a rate determined by the program. After each 
clock interrupt, the clock is reinitialized with a new number obtained by a random number generator. 
The clock interrupts should occur no less than 2 seconds apart, nor more than 9 seconds. The clock in- 
terrupts take first priority, followed by the Teletype, reader, and punch. 

5.2.1 Instruction and Memory Tests - The instruction test portion of the Basic Exerciser performs tests 

on all operate group and memory reference instructions. The individual instructions are looped a random 
number of times before proceeding to the next test. The maximum number of loops made on any one test 
is 32,767. 

The adder is tested using two different methods. The first performs bit by bit tests on the adder 
using the ADD instruction. Besides checking for correct results after an addition, the link is tested during 
overflow and no overflow conditions. 

The second method, the "Add Random Pairs" test, tests the adder using one pair of random 
numbers (A and B) and their 1 's complement values (-A and -B), and the ADD instruction. These four 
values are added in various combinations, the results of which are compared against precalculated results. 
The precalculated results are obtained by adding the two pairs together using the TAD instruction. Four 
additions are made, the results of which are used in the test. The link is tested after each addition. If 
it is a 1 , a I is added to the result to simulate an end-around-carry . 

The numbers added and their sums are indicated in the listing using the following symbols: 

-B+(-A) = SUMNEG 
A+B = SUMPOS 

B-A = BMASUM 

A-B = AMBSUM 



The values of A, -A, B and -B plus their sums are used to test the combinations of ADD's 
shown below. 

ADD SUM SHOULD EQUAL 



A+ B 










SUMPOS 




-B+ A 










AMBSUM 




-B+(-A) 










SUMNEG 




B - A 










BMASUM 




(A + B) - A 










BPOS 


(B) 


(B - A) -B 










ANEG 


(-A) 


(-A-B)+A 










BNEG 


(-B) 


(A - B) +B 










APOS 


(A) 


777777 + A 










APOS 




A+ B - A 










BPOS 




A + B -A -A 










BMASUM 


(B-A) 


A + B -A -A 


-B 








ANEG 




A + B -A -A • 


-B 


-B 






SUMNEG 


(-A -B) 


A + B -A -A ■ 


-B 


"~B ~^~ 


A 




BNEG 




A + B -A -A ■ 


-B 


-B + 


A + 


A 


AMBSUM 


(-B + A) 


A + B -A -A ■ 


-B 


-B + 


A+A+B 


APOS 





After completing one pass of the above tests, a second pass is made on the same tests. The 
second pass makes all "B" constants "A", and all "A" constants "B" before repeating. 

Immediately following the second pass, one random number and its Is complement is obtained 
and saved in APOS and ANEG, respectively. Bit of APOS is tested for equaling or 1 . If the value 
is 1, the bit remains unchanged, and the respective bit in the complement number is changed to equal a 
1 . The two numbers are then added together, the sum of which should equal all Os except for bit 0. If 
the ADD is successful, the program continues testing all other bit positions in the same manner. 

Example: (Bit altered) 

Step APOS Value ANEG Value 

1 577776 200001 

2 577776 600001 (bit altered) 

3 Add together. Result should = altered bit. 
+ 101 111 111 111 111 110 

no ooo ooo ooo ooo 001 



011 111 111 111 111 111 

1 (end around carry) 



100 000 000 000 000 000 
The sum equals the altered bit position. 



After completing the adder tests, the remaining memory reference instructions are tested. 
The last test performed by the exerciser is the memory checkerboard test. This routine writes and reads 
four different checkerboard patterns similar to the Basic Memory Checkerboard program. The memory 
test is looped three times before program relocation takes place. 

After completing the memory checkerboard test, the program relocates the entire Basic Ex- 
erciser to the opposite 4K field. All memory reference instructions and memory locations used for testing 
are adjusted accordingly. All locations within the program which reference any memory location be- 
tween and 21 are not adjusted. These locations are used during program interrupts, autoindexing tests, 
etc., and must not be altered. Program interrupt is disabled while relocation is taking place. 

After relocation of the program is completed, the exerciser is automatically restarted at lo- 
cation 70 (or 10067). This location is tagged SEQUEN. The operator is able to determine the location 
of the program by observing MB bit 5. This bit will glow brightly when the program is in the higher 4K 
field, as compared to when residing in the lower 4K field. 

The Teletype BELL will ring once for each completed pass of the program. One pass is de- 
fined as the program performing all tests from each 4K field, and then relocating back to the field in 
which the program was first initiated. 

When operating the Basic Exerciser with program interrupt inhibited (ACS 1 up), the message 
"COMPLETE" will be printed after five complete passes of the program. This message is printed after ten 
passes when ACS 4 (inhibit relocation) as well as ACS 1 is up. This feature is included as a means to 
determine the number of successful passes completed by the program if it is to be run for extended periods 
of time . 

5.2.2 Punch, Read, Print Sequence - The instruction and memory tests will be interrupted, at a device 

rate, by the punch, reader, or Teletype. The data punched consists of the alphabet characters, followed 
by numbers through 9, with a space character being punched between each letter or numeral character. 
The reader will read the tape at punch speed, storing away any punched character. Frames of all 0s are 
ignored. The punch and read sequence consists of 52 ASCII characters punched, read and stored away in 
an input buffer (tagged TTBUFA). After reading the 52nd character, the contents of TTBUFA are trans- 
ferred directly to another 52 - location buffer tagged TTBUFB. This second buffer is provided to enable 
the operator to stop the program and compare the contents of either buffer A or buffer B with the punched 
data on tape. Punch and read operation is halted after the 52nd character is read and stored. The con- 
tents of TTBUFB are then printed on the Teletype. The punch and read sequence continues immediately 
after the 52nd character is printed. The data punched and read should appear on the Teletype as the 
example below. 

ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 
ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 



The punch and read sequence generates 72 characters altogether, even though only 52 are punched, 
read and printed at one time. The alphabet and numbers sets with a space between each character enables 
a full line to be printed. The spacing also enables the operator to more easily detect a misprinted char- 
acter. Each group of 72 characters is separated by 8 blank frames. The group which is positioned in the 
reader is the current line being printed. A carriage return and a line feed is punched at the end of each 
group. The program will punch 6 extra blank frames between two groups, approximately every four- 
teenth group, to enable the slack between reader and punch to remain constant. 

5.2.3 Use of the Real Time Clock - The instruction and memory tests, and the punch, read and print 
sequence are both interrupted randomly by the real-time clock. When a clock interrupt occurs, all other 
operations are halted until the clock interrupt has been serviced. The program allows the clock to con- 
tinue incrementing for 1/2 second after the interrupt occurs. This is evident during every clock interrupt 
by observing MB indicators 12 through 17 incrementing. Immediately after the clock has incremented, an 
additional 1/2 second, it is reset to a new random value. This value is chosen by the program to ensure 
that the clock interrupts no sooner than 2 seconds, nor later than 9 seconds. The clock is again enabled 
after being reset to a new value, and the instruction test or read, punch and print sequence is allowed 

to continue from the point of interrupt. 

At times, the Basic Exerciser may appear to be caught in a loop after a clock interrupt occurs. 
The console indicators will show the clock and PIE as being disabled, and the punch, read and print 
sequence will be halted for several seconds. The program during this time is attempting to generate a 
number for the clock which falls within the 2 to 9 second limit. All operations will be resumed as soon 
as a suitable random value is found. 

The operator may disable the clock interrupts by restarting from location 26 with ACS 5 up. 

5.2.4 Interrupt Service Routine - Program interrupts by the clock, punch, reader or Teletype are all 
serviced by a common routine. A common routine for reentering the instruction test- is also used. 

Locations through 6 are used to save the contents of the AC and PC immediately after an in- 
terrupt occurs. The contents of the AC are stored in the location tagged SAVAC . The contents of the 
link and PC are stored in the location tagged RJMP. The program then enters a routine which determines 
which of the four devices interrupted the program. This routine is tagged SRVINT. SRVINT will test for 
device flags in the following order: clock, Teletype, no-tape flags, reader, punch. The first device 
flag found to be set indicates the device which must be reinitiated by the program. 

Immediately after selecting the proper device, a routine is entered which will restore the con- 
tents of the link and AC at the time of the program interrupt. The routine is tagged RTNIT. RTNIT first 
restores the AC (from SAVAC); restores the link (by testing bit of RJMP); enables program interrupt; and 
then returns to the instruction test by a JMP indirect on the contents of RJMP. 



The operator may disable program Interrupts by restarting from location 26 with ACS 1 up. 



5.3 Program and Operator Action 

See Sections 4.2 and 5.2. 



6. 



ERRORS 



6.1 



Error Halts and Description 



Reference the program listing for all error halts. 

All error halts are tagged EXXX, and are commented to aid debugging. Each test is self- 
contained, and may be looped. See Section 6.2.1 for looping instructions. 

Unless a solution is obvious from following the listing, the proper MAIN DEC diagnostic for 
the device in error should be run. This should be necessary mainly when errors are caused by one of the 
I/O devices. The diagnostics for the I/O devices are listed below: 



Device 

Real-Time Clock 

Program Interrupt 

Punch 

Reader 

Teletype 



Program 

Instruction Test Part > < 
Instruction Test Part > 1 
Punch Test (9A-D2DB) 
Reader Test (9A-D2CB) 
TTY Test (9A-D2BB) 



Incorrect operation of the real-time clock will appear as clock interrupts occurring sooner 
than 2 seconds apart, or greater than 9 seconds, or possibly no clock interrupts will occur. Also, after 
a clock interrupt, the clock should not increment further for any longer than approximately 1/2 second. 

Printing of incorrect data may be caused by the data being incorrectly punched, read, or 
printed. Storage registers, and their locations in the program, which the punch, read, print sequence 
use are listed below. 

Function 



Tag 

SAVAC (7642) 
RJMP (7643) 
WORK (7630) 
GOPNCH (6763) 
SETCLK (6604) 

CLKSET (6621) 
TTOUT (7325) 
TTIN (7326) 



Saves contents of AC after a program interrupt. 

Saves contents of PC and link after a program interrupt. 

Bit 1 if set indicates TTY is in use. 

Contains contents of PC at exit from punch routine. 

Routine which sets a random value in clock register 7 when 
program interrupt is disabled. 

Same function as SETCLK, but is used only after a clock interrupt. 

Location pointer for TTBUFB when printing. 

Location pointer for TTBUFA when reading. 



Tag Function 

TTBUFA (7360 to 7443) Storage buffer for characters read. 

TTBUFB (7444 to 7530) Storage for characters to be printed. Contents should equal 

TTBUFA. 

STORE (7335) Contains character punched. 

SETTY (7037) Routine which is entered after 52 characters have been punched 

and read. Sets up TTBUFB before printing. 

GENRAN (6102) Random number generator used when PI is disabled. 

RANGEN (6133) Same as GENRAN, but used only after an interrupt. 

When data is incorrectly printed, stop the program during print-out. This will enable both 
TTBUFA and TTBUFB to remain unchanged. TTBUFA will be changed as soon as reading begins. 

The data punched is in ASCII mode, and one printed line is indicated on the paper tape by 8 
blank frames separating each line. The punched data starts with character A (301) and ends with a line 
feed (212). A space (240) is punched between all alphabet and number characters. 

The line of punched characters in the reader is the line currently being printed. The operator 
may inspect the tape for an incorrect character punched. If it appears correctly on the tape, it may have 
been read or printed incorrectly. The characters read are stored in a 52-word buffer beginning at loca- 
tion 7360 (tagged TTBUFA). The characters being printed are stored in a 52-word buffer beginning at 
location 7444 (tagged TTBUFB). If the program was stopped during printing, these two buffers should con- 
tain exactly the same information. The first character read or printed is stored in the first location of 
either buffer. One character is stored per location. If the data was read incorrectly, the contents of 
TTBUFA will not equal the last 52 characters on the tape. If the data on tape, and in TTBUFA and TTBUFB 
are equal, the teleprinter may be at fault. 

6.2 Error Recovery 

Press CONTINUE to receive further error halts or to continue testing, as indicated by the 
listing. 

Recovery from error halts in the Add Random Pairs test is accomplished by pressing CONTINUE 
one or more times, depending on the type of error encountered. Pressing CONTINUE after a halt due to 
an incorrect sum will result in a second halt. The AC will equal the incorrect sum at the first halt, and 
the sum used for comparison at the second halt. If the error halt is the result of a LINK error, the next 
test in sequence will be executed. 

Recovery from memory checkerboard errors is accomplished by pressing CONTINUE four times. 
The memory test is restarted after each error halt. 



The contents of the AC after each halt will equal the information below. 

C (PC) C (AC) 

6351 The address at which the memory error occurred. 

6353 What the location should equal (000000 or 777777). 

6355 The data as read. 

6362 The pattern control word used. 

Bit suppression may be accomplished by placing the corresponding ACS up after the halt at 
location 6354. Place ail other ACS down, press CONTINUE, place all ACS down again, and then 
restore ACS through 5 if needed. The bits selected will not be tested again during the memory test. 
The selected bits must be reselected after each error halt. 

The memory checkerboard test may be continuously looped by restarting from location 26 with 
ACS 3 up. Program relocation will not take place. 

6.2.1 Looping on Individual Tests - Looping on individual tests, except for the interrupt routines, 
Add Random Pairs test and Memory test, is accomplished by placing a JMP instruction in the first loca- 
tion of the next test in sequence. The address in the JMP instruction should equal the first location of 
the test to be looped. Restart the program at location 26, if program interrupt is to be enabled. Restart 
at the first location of the test to be looped, if interrupts are not wanted. 

The complete series of tests for any one instruction may be looped by placing a NOP in the 
location which contains ISZ WORK3. This instruction appears at the end of each series of tests for each 
instruction. Restart at location 26, or at the beginning of the test to be looped. 

6.2.2 Looping on Add Random Pairs - The complete series of tests may be looped by restarting from 
location 26 with ACS 2 up. 

The individual tests may be looped by changing the LAW instruction, appearing after each test, 
to a JMP. For example, to loop on (A-B) + B = A (tagged AMBPBT), change the LAW AMBPBT instruction 
to JMP AMBPBT. Restart from location 26, or AMBPBT. 

6.2.3 Looping on Memory Checkerboard - Place ACS 3 up, and restart from location 26. 

6.2.4 Error Print-outs - The program continually tests for reader or punch no tape indicators being 
set. When either indicator is set the message "R NO TAPE", or "P NO TAPE" will be printed. The 
program continues on in sequence after either print-out. 
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7. OPERATING RESTRICTIONS 

All MAINDEC diagnostics which apply to a basic PDP-9 configuration should be run before 
attempting to run this program. 

8. MISCELLANEOUS 

8. 1 Execution Time 

Approximately 1-1/2 minutes are required to execute all tests for one 4K field. 

9. PROGRAM DESCRIPTION 



The Basic Exerciser performs tests on all operate and memory reference instructions plus core 



memory. 



During normal operation (all ACS down) the program exercises the real-time clock, punch, 
reader, Teletype and program interrupt while the instruction test portion is running. The MB indicators 
will change according to the portion of the instruction test currently being executed. When a clock 
interrupt occurs the MB bits 12 to 17 will increment for 1/2 second (due to clock counts), after which 
the MB indicators will return to their original state upon re-entering the instruction test. 

When the punch, read and print sequence is operated with the instruction test inhibited 
(ACS up) the MB will indicate a constant 600132 (JMP 132). On the listing this is written as JMP 
at location 132. At location 131 the program interrupt is enabled, and ail device interrupts will cause 
an interrupt immediately after the execution of the JMP instruction. The interrupts are handled in the 
same manner as if the instruction test portion were operating; the difference being that the interrupt ser- 
vice routine (RTNIT) always returns to location 132 after reinitiating the device which caused the in- 
terrupt, instead of returning to the instruction test portion. 

The instruction test portion of the program consists of MAINDEC 9A-D01 A and D02A (Instruc- 
tion Test, Parts 1 and 2) condensed onto one tape. Refer to the program listing or flow chart for the 
testing sequence. 

The memory test is executed after the instruction test portion is completed. This test is similar 
to MAINDEC 9A-D1AB Basic Memory Checkerboard Test. This test is performed three times, after which 
a routine is entered which relocates the Basic Exerciser to the opposite 4K field in core memory (unless 
ACS 4 is up). The Exerciser is automatically restarted after relocation is completed. 

If no errors occur, the Basic Exerciser will run until stopped by the operator. 
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10. FLOWCHARTS 



V 



T LOCATION 22 



PUNCH LEADER 



C 



I 



HALT 



J 



CLEAR ERROR 
TABLES ; BUFFERS 



LOCATION 26 

RESTART 

PROGRAM HERE 



£> 



^£ i^. — 



SETUP PI ROUTINE 

IN LOCATIONS 

THRU 6 



T 



LOCATION 70 
SEQUEN 




d> 



ENABLE PROGRAM 
INTERRUPT 




BEGIN THE 
INSTRUCTION TEST 



ADD RANDOM 
PAIRS TEST 



J> 



MEMORY TEST 



J 



Generalized Flow of PDP-9 Basic Exerciser 
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TEST CLEAR AC WITH 
IOT 700X10 (MB14) 



TEST DBR 



TEST OPERATE GROUP 



TEST LAC 



TEST AND 



TEST XOR 



TEST TAD 



TEST ADD 




TEST SAD 



TEST DZM 



TEST DAC 



TEST ISZ 



TEST JMP 



1 



TEST CAL 



TEST JMS 



TEST XCT 



TEST XCT JMS 



TEST FALSE 
AUTO-INDEXING 



TEST LAC INDIRECT 



I 



TEST XCT JMS 
INDIRECT 



X 
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TEST JMS INDIRECT 



TEST XCT 
INDIRECT DZM 



TEST ISZ INDIRECT 



TEST XCT INDIRECT 
AND INDIRECT 



TEST AUTO-INDEX 



C 



MEMORY TEST 



D 



JL 



RUN CHECKERBOARD 

ON OPPOSITE 4K 

FIELD 





RELOCATE 



") 



RING BELL TO 
INDICATE ONE PASS 




c 



RELOCATE 




DAC INTO 
CORRESPONDING ADR. 
IN OPPOSITE 4K FIELD 




Program Relocation Routine 



15 




Interrupt Service Routine 
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c 



CLKINT 



J 



I 



C(7) = 
AT THIS PIONT 




TURN OFF CLOCK 



GENERATE NEW 
RANDOM VALUE 



YES / IS 

v ' VALUE <2 

SECONDS 




CLEAR AC BITS 

TO 8 SO VALUE 

IS > 9 SECONDS 



TAGGED CLKSET 
ON LISTING 



COMPLEMENT AC 
a DAC INTO LOC. 7 



TURN CLOCK ON 



c 



RTNIT 



J 



Service Clock Interrupt 
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( TTYINT ~") 

f 

SET FLAG TO 

INDICATE TTY IN 

USE 



READER a PUNCH 
PREVIOUSLY CLEARED 




FETCH CHARACTER 
FROM TTBUFB 



SELECT TTY (TLS) 



f RTNIT J 



ERROR HALT 



J 



ERROR HALT 



J 



Service TTY Interrupt 



c 



PNSTRT 



D 



CLEAR TTY FLAG; 
MASK ACS 7 8 8 




CLEAR PUNCH FLAG 



c 



RTNIT 



J 



I 



SELECT READER a 

PUNCH TO INITIATE 

SEQUENCE 



<D 



GENERATE ALPHABET 
CHARACTER 



V_ 



GO PUNCH 



J 



f RETURN FROM ~\ 
' V GO PUNCH J 



FETCH SPACE 
(240 ASCII) 




(RETURN FROM *\ 
GO PUNCH J 



FETCH SPACE 
(240 ASCII) 



c 



GO PUNCH 



J 




ATTEMPT TO CLEAR 

AC WITH 700010 

(MB14) 



Punch Routine 
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c 


GO PUNCH ) 


i 


PUNCH C (AC) 
WITH PSA 




NOTE: 
COUNT A AND COUNT B ARE 
COUNTERS USED BY THE PROGRAM 
TO ENABLE THE READER TO 
OPERATE AT PUNCH SPEED. 
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FETCH CHARACTER 
FROM READER BUFFER 



CLEAR READER 


FLAG 


1 


Q RTNIT 


) 




■ SELECT READER (RSA) 



RTNIT 



J 



Read full speed ACS 7 A 1 
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( RTNIT J 

7 

RESTORE LINK 
(BIT OF RJMP) 



I 



RESTORE AC 
C LAC SAVAC ) 



ENABLE PROGRAM 
INTERRUPT 



JMP INDIRECT 
ON C(RJMP) 



(|N 




o 



CLEAR PUNCH 
8 TTY FLAGS 



READER FLAG 

SHOULD ALREADY 

BE CLEAR 



EXIT TO 
NSTRUCTiON TEST, 



^ 



TRANSFER CONTENTS 

OF TTBUFA (DATA 

READ) TO TTBUFB 

(FOR PRINTING) 



C 



TTYINT 



D 



22 



P A H F 1 

M'CPn-o happy MAINDEC-9A-D7AD-D 



LISIIN' 


G 


/ I T F f ! N I T ! f) N S TO K F F 
/ 




7 1 


/ 

i LSF = 7M>':001 




7 4 


fl nr = 70 '004 




7 4 1 


CLO^= 70,104 4 

/ 

V S I = '001 01 




7 0101 




7001 0? 


w C F = 70010? 




7001 1 ? 


wrh=7001 12 




7001 04 


ws*=70010 4 




7001 44 


hSH= 7001 4 4 

/ 

' SF= ?00?01 




700?01 




700?0? 


t'Cf = 7 00?0Z 




700704 


>-SA = 700?04 




700P44 


PSR=70 0?44 

/ 

«SF=70030l 




7007,01 




70031? 


KRR=700312 

/ 

TSF= 7 00401 




7 4 01 




70040? 


TCF =70040? 




70040/S 


T|_S = 700406 
/ 

.TITLE RASFX9 










/POP-0 RASIC EXFRCISFR 
/ 

. ARS 






0C000 




.LOC 
/ 

/PnP-9 INSTRUCTION TFST 
/ 








00 


000000 


00001 


741 000 


SKP 


0000? 


740040 


Fl HAI T 


u>00,3 


4 7 f 4 ? 


DAC SAVAC 


,1 £> 4 


?00000 


LAr: 


OS l ' 5 


4 7 A 4 3 


OAC RJ*P 


ill' 006 


60 6^36 


JMP SRVJNT 




740000 


/ 

f-iOPl = NOP 




7 4 00 00 


NOP?=NOP 




7 4 0000 


>■■ P 3 = N P 




740040 


HALT^HLT 
/ 

.LOC 2? 
/ 
REG IN JMS PNi EOR 


0?? 




0P022 


1071 70 


0['0?3 


107?0? 


. J M S P N m A R K 


0P0?4 


1071 70 


JMS PNI EOR 


o ? 5 


740040 


HAL T 


0i'0?6 


147A34 


n 2 « W R K 4 


0£'0?7 


1 4 7 3 1 1 


flPM RRFAK 



(CONDENSED > 



/ERROR. PC INCREMENTED BY 
/? AT TIME OF P. I . 
/SAVF AC 

/S*VF PC AND LINK 

/SERVICE INTERRUPT 



<A^FX9 



PAGE 



000.30 


70330? 


PI i 031 


14 7630 


0i 03? 


146763 


f. '033 


20667ft 


34 


4 7 3 2 6 


0-035 


4 7 3 25 


0i'036 


4473?S 


iM 37 


1673?*; 


01- 0"? 


20 7^?- 


!< 41 


5 4 6 o 7 7 


4 ? 


7 4 1 


00043 


60003ft 


0t'04 4 


206676 


00045 


047325 


00046 


206124 


01/04 7 


4 7 31? 


00050 


777737 


00051 


047241 


00052 


4 4 7 3 1 2 


00053 


16731? 


0C054 


447241 


0C055 


60005? 



CA! 




n?H 


wri'-K 


n ^ ■-•■ 


CO-'NCH 


I AC 


DA r ARL 


n*c 


TT [N 


HAT 


TTi>UT 


is? 


TT'ilJT 


n 7 :•< < 


» TTOUT 


I AC 


TT'.UT 


S A <-, 


p N •: i C) I N 


S Kp 




J MP 


. -*• 


LAC 


DATABL 


rue 


TTiHJT 


LAC 


FNilTBL 


oac 


wncNT 


LAW 


-41 


OAC 


CRI F 


IS/ 


WDCNT 


n?M 


<» WOCNT 


IS? 


CRI F 


JMP 


. - 3 


.EJECT 



/ P R F S S CONTINUE TO 

/CI EAR GOPNC.n 

/SETUP POINTERS 



/CLEAR TTY R I N 



/ 



RFSTORE POINTER 



/CLEAR ERROR TABLE 



D a r, E 



'*('05ft 


7 00 


I (li- 




;-;0t;7 


75000(1 


ra 




fl - 060 


7001 01 


f'S' 




!' '■■ PI ft 1 


7 5 <". 


1 A ' 




■••" 06? 


5 7 5 4ft 


A N E 


K V' 


:•" 063 


7 4 12 f 


S N - 




•/ -064 


7 2 & 


PS» 




■0C065 


2 013 


1 »c 


INI TPI 


0"066 


4 6 7ft" 1 


RAO 


C, P N C H 


0«0ft7 


4 7 ft 4 < 


n ac 


PJ"iP 


<? '■■ 7 


20 7ft 16 


SEOUfN LAC 


KSKP 


PI i 071 


040001 


rue 


1 


(•I.V0 7? 


206533 


I.AC 


S A \J 3 


0i-'0 73 


4 :< 


DAC 


3 


0C074 


207651 


LAC 


SAV4 


0>'075 


04 04 


DAC 


4 


00076 


206534 


LAC 


SA V 5 


fli'0 7 7 


04000c; 


DAT 


5 


<•' 10 


206535 


LAC 


SA./6 


■-■ 1 1 


040006 


CAT 


6 


v 1 2 


207647 


LAC 


K H ,\ L T 


0f 103 


04 2 


DAT 


2 


f • J04 


4 4 7 6 3 4 


IS/ 


WORM 


(10 5 


750P04 


1 AS 




0t'10ft 


507555 


AN!! 


Kl !K 


10 7 


7 412 00 


SNA 




0"110 


106604 


JMS 


SETCLK 


Prill 


750004 


LAS 




00112 


741 1 00 


SPA 




fU-113 


6 0131 


JMP 


I NHIT 


«'1H 


740010 


RAI 




0'M15 


740100 


SMA 




0011ft 


70004? 


ION 




00117 


750004 


1 A 1 




1 ? 


507320 


AND 


K100K 


00121 


7402(50 


SZA 




0i"l?2 


602360 


JMP 


RANADD-2 


001 ?3 


750004 


LAS 




001?4 


507552 


AND 


K4i'K 


0"1?5 


740200 


SZA 




00 126 


606055 


JMP 


F 6 4 1 + 3 


00 127 


6001 3 3 


JMP 


10TST-2 


00130 


/ 
006702 INITPI PNSTRT 
/ 
/INHIBIT INSTRUCTION TEST 




0i 131 


700042 ) 


'NHIT ION 




0' 132 


6001 32 


JMP 


, 






.EJECT 



/PI riTF 

/INItIALIZF READER, PuNCH 

/IE ACS 7 OR fl A 1 , DON'T PUNCH 

/INITPI = PNSTRT 

/(RJ"P) = PNSTRT 
/RESTORE ADDRESS 1 (SKP) 

/RESTORE ADDRESS 3 

/RESTORE ADDRESS 4 

/RESTORE ADDRESS 5 

/RESTORE ADDRESS 6 

/RESTORE ADDRESS 2 (HALT) 

/PASS COUNTER 

/CHECK ACS 5 FOR INHIBIT CLOCK 

/INHIBIT INST. TEST 

/CHECK FOR INHIBIT PI 
/PI ON 



/CHECK LOOP ON RANDOM ADD 
/LOOP 



/CHECK LOOP ON CHECKERBOARD 
/LOOP 



/WAIT FOR PI 



1A-TV? 



RAGE 







/TrSi 


n t a« *C at f Vi 


fwl33 


l(*61fl? 


/ 


J MS GE'-RAN 


vl ;-- 1,^4 


1061 26 




J MS OK'O 


0'135 


7 5 1'' 1 


inTST 


CL A !0 M i 


Hi- 136 


7001 10 




701-110 


0t'137 


7 4 ? 




S74 


114 


7 4 4 


^ ?4 
/ 


HALT 


(DM141 


7"5000 1 


CLi !CMA 


01/14 2 


700?10 




700210 


00143 


740700 




S?" 


0'/-144 


740040 


E25 
/ 


HAI j 


0P145 


750001 


C L A ! C M A 


00146 


700310 




700310 


0i*147 


740200 




S?A 


00150 


740040 


F26 
/ 


HALT 


00151 


750001 


0L« !CMA 


0('152 


700010 




7 010 


/l ('153 


741DP00 




S?A 


0> 154 


740040 


F?7 
/ 


HAI. T 


(Di/155 


4476J3 


IS? W0PK3 


0f'156 


6001 35 




JMP I0TST 


01/15 7 


10610? 




J MS OE >RAM 


00 160 


106126 




J M S CKMQ 
.EJECT 



/GET MO. FOR LOOP 

/AC = 7777777 

/AC = 

/ERROR. AC NOT 

/AC = 777777 

/AC = 

/FRROR. AC NO T 

/AC = 777777 

/AC = 

/ERROR. AC NOT 

/AC = 777777 



/AC = '- 
/ERROR . 



AC NOT 



/EHEOK OONF LOOPING 
/LOOP 

/GET NO. FOR NEXT TEST 



PACF 







/Ti s r 

/ 

tsi;« • 


| ;T 3^44 ( RP ) , 


■^•ui 


744 ;• 


cli 


"■■ 1ft? 


10 2 0/1 




.IMS n > X 


'-< ■ 16 3 


7 4 1 4 




S?i 


(' i< 1 6 4 


7 4 0040 


( ?>-■ 


HAi T 






/ 

/TFST 
/ 


I 'IT 334 4 MRR), 


0'*1 65 


7 4 4 2 


CLL !CM| 


M''lfi6 


1 00204 




JMS ORi'X 


0"1 67 


740400 




SNI 


0C'1 70 


7 4 004 


F'29 
/ 

/TFST 
/ 


HAI. T 






JOT 3344 C)BR>, 


Hrl71 


7 5 4 


CLL !CL* 


« '■•■ 17 2 


100207 




jms drrxx 


HP 173 


740400 




SNL 


0<'l 74 


740040 


F. 3 


HALT 






/ 

/TFST 
/ 


IOT 3344 COBR), 


1 1 7 5 


754002 


CL1 !CMl !CLA 


0-''176 


100215 




JMS f)RRXXX 


0<'l 77 


751400 




HLA'S?! 


0<-'?PI0 


740040 


F31 


HALT 


l 1l>.?01 


4 4 7 ft 3 3 




IS7 W0RK3 


01^202 


6001 61 




JMP TSiiRR 


0i-20 3 


60 2 23 




JMP OPRAT 


v:<>?u4 


000000 


/ 
DRRX 





00 205 


70 3 3 4 4 




703344 


2 6 


620204 




JMP» niJRX 


0."207 


000000 


/ 

ORRXX 





0i,-.?10 


200207 




LAC ORRXX 


0t'21 1 


347553 




T A n k 4 K 


3i 212 


040207 




rue newxx 


"''213 


703344 




703344 


r *"21 4 


620207 




JMP. FHRXX 


'■'■'■■215 


000000 


/ 

n R R X X X 





■?•<■■ 216 


200215 




LAC OBPXXX 


^■'21 7 


507626 




AND M4 00K 


0;<220 


04 021 S 




FiAC OBPXXX 


01 221 


703344 




703344 


5"' 222 


620215 




JMP* ORRXXX 
.EJECT 



L= 



L = 



L - 1 



/LINK ; 



/FRRDR. DRP FAIl.EO; L [ mk NOT 



/! = 1 



/ERROR . 



/AC, L 



DBR FAILED. I INK NOT i 



/ERROR. DRR FAILED, LINK NOT 1 



/L s 1, AC s 



/FRROR. DBR FAILED, LINK NOT 

/CHECK DONE LOOPING 

/LOOP 

/START INSTRUCTION TFST 

/LEAVE LINK ALONE 
/DfiR 



/SET LINK TO A ONE 
/DBR 

/CLEAR LINK 

/nBR 



<A-E*9 



PACE 







/ T f S T 


OPT 1 


iATf OR'UJP 


;v 2 2 3 
1'-??4 

0< 225 


1 (*61 a? 

1061 ?6 
777777 


/ 
oppa! 

nPf RaT 

/ 

f 32 

/ 

/TFST 




JMS r,t. ;RAN 

.IMS nivci 

!.. A ,, 1 7 777 


01227 


7 4 1 jt !.': 

7 4 4 




S K t - 
HAl.T 






CLA 


- S?A 


00230 
00231 

00 23 2 


7 5 0000 
740200 
740040 


F33 
/ 

/TFST 




OL>'> 
Si? A 
HAI J 






S M A 




00233 
00234 
00235 
00 236 


750000 
7401 00 
741000 
7 4 4H 


F34 

/ 

/TFST 




CLA 
SMA 
SKP 
HALT 






SPA 




0i'237 
00240 
00241 


750000 
74-1100 

740040 


F35 

/ 

/TFST 




SPa 
HA| T 






SNA 




s< 2 4 2 
00243 
0H244 
00 245 


750000 
741 200 
741000 
740040 


F36 

/ 

/TFST 




CLA 
SNA 
SKP 
HA| T 






S2L 


- FLL 


01/24 6 
00-247 
at- 250 


744000 
741400 
7 4 4 


F37 

/ 
/TFST 


SNL 


nil 

SHI. 

HALT 


00251 
00252 
00253 
3C254 


7 4 4 0.00 
740400 
74 1 000 
740040 


F38 




CLI. 
SNL 
SKP 
HA| T 
.EJECT 



/GET NO. FOR LOOP IN TFST 

/AC = 77777 7 

/TFST SKP 

/FRRoR; SkP FAjLFn Tn SkjP 

/AC = 

/ERROR; CLA OR S?A FAILED tO Skip 

/AC = 



/FRROR; SAMF SKIPPED 



/ERROR! SPA FAlLfO TO SKIP 



/ERROR! SNA SKIPPED 



/LINK = 

/ERROR! S?L FAILED TO SKIP OR 
/CLE EAjLEO TO CLEAR LINK 



/LINK = 



/frror; snl SkIppe" 



•A FV9 



PAGE 







/Tf ST 


CI A CLI 




■:n, pS5 


754000 




CLA : CLE 




«"?56 


7 4 2 




S*/ 




<■ ■' 7 5 7 


740040 


f 39 

/ 

/TEST 


HAI T 








OLA CLI. 




.v 2 6 


7540.00 




CLA ! CLI 




^t'?61 


7414 




SZI 




"!'■■■ ?63 


7 4 4 


F 4f 

/ 

/TFST 


HAI T 
SKP SPA 




<*!■■-? ft 3 


750000 




CLA 




0«?fi<t 


74 11 00 




SkP'SPa 




0f'?65 


740040 


F41 

/ 

/TEST 


HALT 
SKP SNf 




'A"?i«.6 


750000 




CLA 




0267 


741 200 




SKP • SNA 




01'270 


741 000 




SKP 




('271 


740040 


E4? 

/ 

/TFST 


HALT 








SKP SZI. 




0'/272 


744000 




CLL 




0"273 


741.400 




SKP! SHI 




00274 


740040 


F43 

/ 

/TEST 


HA, T 








SPA SNA 




n r '27«5 


750000 




CLA 




0("-276 


741 300 




SPA !SNa 




P ? 7 7 


741000 




SKP 




0f'300 


740040 


F44 

/ 

/TEST 


HA| T 








SPA S2L 




,': ('301 


754000 




CLA ! CLL 




0P302 


741500 




SPA :s?l 




0P .10,-? 


740040 


E45 

/ 

/TFST 


HALT 
SNA S?L 




0r304 


754000 




CLAiCLL 




305 


741600 




SNA'SZI 




00 306 


741000 




SKP 




!■' 7, 7 


740040 


E46 

/ 

/TEST 


HALT 








SNA, SPA-, SKP, 


S2L 


0!-»31 


754000 




CLA ! CLI 




30-31 1 


741 700 




SKPISPA !S2L 


•SNA 


312 


74 1000 




SKP 




00 31 3 


740040 


F47 


HALT 
.EJECT 





/AC, LINK = 
/FRROR; AC NOT 

/AC ANT) LINK s 

/frrpr; link not 

/error; skpispa failed to skip 



/frrdr; skpisna skipped 

/LINK = l 

/ERRnR! SKp!S?L FAI L ED To SKIp 



/error: spaisna skipped 

/link and ac = 

/error; spa'szl failed to skip 

/link and ac = 
/error; sna<szl skipped 

/AC AND LINK s 

/ERROR; SNAiSPA 'SKPiSgL SKIPPED 



<A-Fy9 



PAGE 



*' ."514 


;?' 515 


0' 516 


.5-51 7 


iV. 3?0 


H!-'3?l 


0<-'3?? 


003?3 


003?4 


W f 3 ? "5 


003?6 


003?7 


01*330 


3i-331 


00332 


W 333 


0"334 


0!'335 



0033 6 
00337 
00340 
V 3 4 1 
00342 



00343 
00344 
00345 
00346 
0C 34 7 



35 
00351 
00352 
00353 
00354 
ai-- 355 



7 5 
7 4 (1 3 
7 4 fl fl 4 



7 5 4 i,> p 
7 4 5 
7 4 10 
740040 



754000 
740600 
7 4 00 4 



754000 
740700 
740040 



744(100 
74000? 
741 4 00 
741000 
740040 



744000 
74000? 
744000 
741.400 
740040 



744000 
74000? 

74000? 
741 4 00 
7 4 4 



744000 
74000? 
74400? 
741 400 
741 000 
740040 



/TFST 


SMA 


S I A 

CLA 

S M « ; S r a 


F 4ft 




HAI T 


/ 






/Tf SI 


S"t 


SNI 

CLA !CLI 
S M A ; s N i 
SKp 


F49 




HAI T 


/ 






/TFST 


S/A 


S1I 

CLf- :cli 
s?a : sni 


F50. 




HAI T 


/ 






/TFST 


S^A 


SZA SNL 

cla :cll 
sha:sza»sn 


F51 




HALT 


/ 






/TFST 


CML 


- S2L 

CLl 

CMl. 

S2I 

SKP 


F5? 




HAL T 


/ 






/TFST 


CLL 





F53 

/ 

/TFST 



F54 

/ 

/TFST 



f"55 



CLL 
CML 
CLL 
S?l 
HALT 

CML 

CLl 
CM I. 
CML 
S?l 
HAI T 

CLL CML 
CLL 
CML 
CLl 
S?L 
SKP 
HAL T 
.EJECT 



! CMl 



/ERROR; SMA SZA FAILFD TO SKIP 



/I INK AND AC = 



/FRROR; SMAjSNL SKIPPEH 



/FRROR; s?A!sNL SKIPPED 



/FRRnR; SMAIS2A-SNL FAILED TO SKIP 



/I. INK - 
/LINK = 1 



/FRROR; SZL SKIPPED OR 
/CML FAILED TO SET LINK 



/LINK = 
/LINK = 1 
/ L I N K = 

/FRROR; CLL FAILED TO CLEAR LINK 



/LINK r 
/LINK = 1 
/LINK = 

/ERROR; CML FAILFD TO SET LINK 



/LINK = 1 
/LINK = 1 
/LINK = 1 



/ERROR! CLLICML FAILFD TO SET LINK 



p a r, f 



/ Tl S T 





35 A 


a 


357 


a 


"360 




-'361 


A 


362 




363 




-'36 4 


A 


3 65 


(A 


366 


a 


•367 





3 70 


A 


371 





372 


A 


373 


•A 


'374 


•f< 


•3 7 5 


!?■! 


•376 


A, 


377 


A! 


400 


* ' 


401 


•H 


'40? 


t/ 4 3 


SH 


'404 


00<105 


■M 


'406 


V>< 


407 


'AC 


41 


;i ( 


41 1 


0r 


41 2 


31 


413 


;/, r. 


41 4 


'</' 


41 5 


AC 


41 6 



7 4 41-00 
7 4 7 
744000 
7 4-100? 
741 400 
741 000 
7 4 4 



744000 
741 400 
7 4 4 



750000 
74400? 
741 600 
74 1000 
740040 



750000 
74400? 
741 500 
7 410 
740040 



75400? 
741 400 
741000 
740040 



75400? 
740?00 
740040 



7540(71? 
740600 
740040 



75400? 
740500 
740040 



F56 

/ 

/Tt- ST 

F57 
/TFST 



f 58 

/ 

/TFST 



F.59 

/ 

/TFST 



r l I 

CMI 
CI I 

ru '.cm. 

S£l 
SKP 
HAI T 

SKP S?L 
CLL 

SKP!S?I 
HALT 



S2L 



S?l. 



CL; 



"60 



SN,< 
OLA 
CLI. !CML 

szi :sna 

SKP 
HAI T 

SPA 
CLA 
CLLICMi 

S21 ' S ps 
SKP 
HAI. T 

CLI CMI. 

CI A! CLL! CML 

S?L 

SKP 

HALT 



/ 

/TFST CLA CLI CMI 

CLAICLL !CML 

SZA 

HAL T 



F61 

/ 

/TEST 



F6? 

/ 

/TEST 



F63 



SML SZA 

CLA !CLL !CML 
SNL !S?A 
HAI f 

SNL SMA 

CLA • CLI ICML 
SNI ! S M A 
HAI T 
.EJECT 



/LINK ; 

/LINK r 1 

/LINK i 

/LINK r 1 



/FRROR; CLLICML FAILFD TO SET LINK 

/LINK = 

/FRROR! SKPIS2L FAILED To SKIP 



/AC = 
/LINK = 1 



/ERROR! S2L!SNA SKIPPEO 



/AC = 
/LINK = 1 



/FRROR; S2LISPA SKIPPEO 

/AC = 0, LINK = 1 

/FRROR! LINK NOT 1 

/AC = 0, LINK r 1 
/FRROp; AC NOT 

/AC = 0, LINK r i 

/FRROR; SNL'SzA FAILFD T" SKIP 

/AC = 0, LINK = 1 

/ERROR; SNL:SMA FAILFD TO SKIP 



<A-Ey9 



PAGE 10 







/TEST 


SNL 


S Z A S M A 


0-417 


75400? 






CLA «CLI !CML 


0f'4?0 


7 4 7 






S N I : S 7 A ; p H A 


iM?1 


740040 


I- A-i 
/ 

/TEST 




HAI T 






CMA 


CLA 


«f'4?? 


7"50000 






CLA 


0M?3 


7 4 01 






CMA 


0f 4?4 


750000 






CLA 


004?5 


741200 






SMA 


0P4?6 


741000 






SKP 


0C'4?7 


740040 


F65 

/ 

/TEST 




HAI T 






C«ft 


SPA 


0C.430 


7^0000 






CLA 


0P431 


740001 






CMA 


0H432 


741100 






S p A 


0IM33 


741000 






SKP 


0t?434 


740040 


E6ft 




HAL T 






/ 
/TEST 


C"A 


SNA 


0^435 


75000H 






CLA 


00436 


740001 






CMA 


0P437 


741 ?00 






SNA 


? 4 4 


740040 


F67 

/ 
/TEST 


CMA 


HALT 


0W441 


750000 






CLA 


00442 


740001 






CMA 


0IM4 3 


740001 






CMA 


1? 4 4 4 


741200 






SNA 


0P445 


741000 






SKP 


0M46 


740040 


F6« 




HALT 






/ 
/TEST 


CLA 


CM A 


0t»447 


750001 






CLA !CMA 


0F450 


741200 






SNA 


0(-»451 


740040 


E69 




HAI 7 
.EJECT 



/AC = 0, LINK = 1 

/fRpor; snl;sza:sma failed to skip 



/AC = 
/AC = ONfS 



/ERROR; CLA FAILED TO CLEAR AC 



/AC = 
/AC = ONfS 



/ERROR; SPA SKIPPED OR 

/CMA FAILED TO SET AC HIT 



/AC = 
/AC = ONES 

/ERROR; SNA FAILED TO SKIP 

/OR CMA FAILED TO SET ANY AC BIT 



/AC - 
/AC = ONES 
/AC = 



/ERROR; CMA FAILED TO 
/COMPLEMENT AC TO 



/AC = ONES 

/ERROR; CLAJCMA FAILED t" 
/SET ANY AC BIT 



p«r,F 11 



/ T ! S I S / >■ 



■:H'45? 


750001 




C L £ ! C M ft 




/ i ' 4 5 3 


7 4 p 




S?A 




(l 4 5 4 


7 4 1 {•' 




SKP 




0M55 


740040 


F70 

/ 

/TFST 


HAI T 








S«l 




an^s 


750001 




CIA ! CM A 




0"4 57 


7401 00 




SMi 




'•■■ 4 6 


740040 


F71 

/ 

/Tf ST 


HALT 








SKP SPI 




i ; ' 4 61 


750001 




CIA !CMA 




.'■' 4 6 2 


741 1 00 




SKP!SPA 




0^463 


74 1 000 




SKP 




<■'■ 4 6 4 


740040 


F72 

/ 

/TFST 


HAI T 








SKP SNA 




■Tift 6 5 


750001 




CIA !CMA 




«M66 


741200 




SKP!SNA 




0M67 


740040 


F73 

/ 

/TFST 


HAI T 
SPA SNA 




^(.'470 


750001 




CLA ,' CMA 




0<y 471 


741300 




SPA !SNA 




0C4 72 


741000 




SKP 




00 4 7.3 


740040 


F74 

/ 

/TFST 


HALT 
SKP SNA SPA 




511/474 


754 H 03 




CLAICMA 


CLLiCML 


0M475 


74 1700 




SNA JSPA 


SKP!SHL 


4 7 6 


741000 




SKP 




004 77 


740040 


F75 

/ 

/TFST 


HALT 
SMA ! S2A 




00.500 


750001 




CLA !CMA 




a v. 501 


740300 




SMA •Si'A 




00502 


740040 


F76 

/ 

/TFST 


HALT 
SMA SZA SMI 




:-U"5 03 


754003 




CLA !CMA ! 


CLL !CML 


00504 


740700 




SMA !S?A ! 


SNL 


0^505 


740040 


E77 

/ 

/TFST 


HALT 








NOP 




9l(,.5fl 6 


7^0001 




CLAiCMA 




00507 


74 00 




NOP 




0«'510 


740001 




CMA 




00511 


740200 




SZA 




0*512 


740040 


F78 
/ 


HALT 








.EJECT 





/AC = ONFS 

/FRROR! SHA SKIPPED 

/AC - ONFS 

/FRROR; SMA FAILED TO SKIP 

/AC = ONFS 

/FRROR! SKP!SPA SKIPPEO 

/AC = ONES 

/ERROR; SKP'SNA FAILFD TO 5KIP 

/AC = ONES 

/FRROR; SPA.SNA SKIPPED 

/AC = ONES, LINK s 1 

/ERROR; SKP!SNA!SPA !S2L SKIPPED 

/AC = ONES 

/ERROR; SMAlSZA FAILED TO SKIP 

/AC = ONF, LINK = 1 
/ERROR; S MA's?A!sNL 

/AC = ONFS 

/AC = 

/ERROR; NOP ALTERED THE AC 



-u <<!■:*<> 



PAGE 1? 



/TEST NOP 



5)r-51 3 


75000!/ 






CLA 


0<'51 4 


7 4 00 






NOP 


0>'515 


740?00 






S/« 


0C'51 6 


740040 


E79 
/ 

/TEST 




HALT 






NOT 




0,/51 7 


74400? 






CLI !CMI 


0v'5?0 


740000 






MOP 


0C5?1 


740400 






SNL 


005P2 


740040 


EB0 

/ 

/TEST 




H A | T 






NOP 




01/.5P3 


744000 






nil 


0f 5?4 


740000 






MOP 


005?5 


741400 






S2t 


0C5?6 


740040 


EBl 

/ 

/TEST 




HAlT 






S?A 


CMA 


005? 7 


750000 






CUA 


0f 530 


740201 






S?A !CMA 


00531 


740040 


E8? 

/ 

/TFST 




HALT 






S?A 


CLA 


0532 


750001 






CLA !CMA 


00533 


750?0i<" 






S i A ! L A 


00534 


741000 






SKP 


00535 


740040 


E83 

/ 

/TEST 




HALT 






S?L 


CML 


00536 


744000 






CLL 


00537 


74140? 






S2! !CMI 


00540 


740040 


F84 

/ 

/TEST 




HALT 






S?L 


CLL 


0c541 


7"400? 






CLL !CM|. 


0054? 


745400 






S?l ! CLI 


00543 


741000 






SKP 


00 54 4 


740040 


F85 

/ 

/TEST 




HA| T 






SKP 


S2L SPi 


vu/545 


75400:" 






CLA !CMA 


54 6 


755500 






SKP!S2l 


0f'547 


741 000 






SKP 


0i-5 50 


740040 


E86 




HA1 T 



/AC = 

/FPROR; MOP SFT AN AC HIT 

/LINK = 1 

/frroR; no cleared the l !n k 

/LINK = 

/error; nop set thf link 



/AC = 

/AC = 0NFS 

/FRRORj S7A FAILED TO SKIP 



/AC = ONES 
/AC = 

/FRRORi Slk SKIPPED 

/LINK = 

/FRROR! S?L FAILED TO SKIP 

/LINK = 1 

/error; s?l Skipped 

LA CLL 
!CLL!CML /AC = ONFS, LINK = 1 
:SPA!CLA!CLL /AC i 0. LINK = 

/FRROR! SKP!S2L!SPA SKIPPED 
.EJFCT 



A -FVQ 



PACE 13 



/TIST S( 



'551 
-'55? 
'553 



!* < 5 5 4 

"if 55 6 
0t'55 7 
71 1 5 6 d 



0(?56l 
00562 
0^563 
00564 
00565 
""'566 



*</'567 
00570 
00571 
5 7 ? 
5 7 3 



0P5 74 
00575 
00 576 
00577 
00 600 
00 601 
ctp 6 02 

00603 



'/1/ 604 
f ■ 60 5 
■'If 606 
0P607 
0"610 
oii'61l 
0061? 
0613 

p 6 1 4 
f, 615 
00 616 
0061 7 



75 4 0? 
744601 
740040 



7 5 51 1 
7 510 
740000 
7 4 2 
7 4 4 



750000 
751001 
740000 
740001 
740?00 
740040 



744000 
74500? 
740000 
740400 
740040 



750001 
740001 
740001 
740001 
740001 
740001 
740700 
740040 



74400? 
74000? 
74000? 
74000? 
74000? 
74000? 
741 400 
740040 

447633 

600725 
10610? 
1061 ?6 



f 8 7 

/ 

/Tf ST 



F 8 8 

/ 

/TFST 



CLA 



SKP 



F89 



/ 



/TEST SKP 



F90 

/ 

/TFST 



CMA 



F91 

/ 

/TFST 



CML 



F9? 

/ 



SNi 


CM-'. 


CLL 


CLA 


! CLl 


•CML 


St 1 ;- 


!SNi 


!CMA 


HA! 


T 




S K P 






CLA 


! CM a 




SKP 


!CL' 




NOP 






SZa 






HAL T 




OL/- 


CM", 




CLA 






S K P 


!C L A| 


CMA 


NOP 






CMA 






S?A 






HAl ' 


r 




CLl 


CML 




CLl 






SKP 


!CLL ! 


CML 


NOP 






SNI 






HALT 




SERIFS 




CLA! 


!CMA 




CMA 






CMA 






CMA 






CMA 






CMA 






S2A 






HALT 






SERIES 




CLL ! 


CML 




CML 






CML 






CML 






CML " 






CML 






SZL 






HALT 






IS2 


W0RK3 


JMP 


OPFRAT 


J MS 


GE'.RAN 


J MS 


CK'v'O 




.EJECT 





inn 



/AC - ?, LINK = 
/ACrONFS, LINK : 

/FRROR. S?A!SNL 



/AC = ONES 
/AC = 



1 

FAILFO TO SKP 



/ERROR. CLA FAILED TO CLEAR AC 



/AC = 
/AC r ONFS 



/ERROR. CLA'CMA FAILED TO 
/COMPLEMENT THE AC 

/LINK = 
/LINK = 1 



/ERROR. CLL'CML FALED TO SET THE LINK 



/AC 
/AC 
/AC 
/AC 
/AC 
/AC 



ONES 



ONES 



ONES 





/ERROR. AC NOT CMA FAILED 



/LINK 
/LINK 

/L'NK 
/LINK 
/LINK 
/LIkjK 



/FRROR. LINK NOT CML FAILED 

/CHECK DOME LOOPING 
/LOOP 
/GFT NO. FOR NExT LOOP 



paff 14 



/ 

/n s ; 



A; 62(2 


7^4 i 9 .7 


"• 621 


7 4 ■/ 9 .'• 


' 6 2 2 


7 4 0/? >' 


•."< 6 2 3 


7 4:? '-.' 


624 


74 / >.'20 


■:»■■• 6P5 


7 4 !*'.' 2 


0i 626 


740020 


01 627 


7 4 2 


j 6 3 ^ 


7 4 00 20 


1'631 


7 4 2 


0i>63? 


740020 


0i'633 


740020 


■•' 63 4 


7 4 2 1* 


0^635 


7 4 2 


0''636 


740020 


0;'637 


740020 


(.640 


740020 


(■ ■ 6 4 1 


7 4 2 


'<"64? 


7 4 2 


0-.'643 


7 4 16 


w 64 4 


7 4 '.' 4 



S F '- I f 
(Ui ! ~ 
PA- 

tv 4 1. 

ci ;- 
Pi;. 
P4i- 
iv 4 i. 
B S,. 
P A (. 
u 4 i. 
r4,. 

WA„ 
R 4 .: 

RAi, 
RAh 
R4i. 
RAl, 

;; M / t ( 

H A L T 
. F. JFC 



AM) 



I >>jl< 



!M< 



/FRROR; 4C BIT 17 NOT 
/.iFTFR RTTsTF SFRU S 



)R LINK 



p a r, f. 



■iff; 



645 


7 6 4 £• a , 


64 6 


7 4 51 .-' 1 ;•' 


6 4 7 


7 4 ■ 1 


660 


7 4 3 V 1 


661 


7 4 1 in 


6 6? 


7 4 5' 1 


66"? 


7400 1.0 


664 


7 4 51 1 


666 


7 4 010 


6^6 


7 4 51 1 !• 


66 7 


7 4 010 


6 6 5? 


7 4 PI 1 '/ 


661 


7 4 51 1 


66? 


7 4 10 


663 


740511 (1 


664 


7 4 Pi 1 51 


666 


7400V/ 


6 66 


7 4 1. 


66 7 


7 4 010 


6 70 


7 4 16 


671 


740040 



« 


67? 


7 6 4 p ? ? 


0> 


67 3 


7 4 ? 1 





674 


7 4 ? 1 





'676 


7 4 701 


■71 < 


676 


7 4 ? 1 





■677 


7 4 ? 1 


'■ 


700 


7 4 ? 1 .<7 




701 


7 4?010 


7, 


'70? 


7 4?01 


(A I 


703 


7 4?010 


a- 


'704 


7 4 1 6 


5 


705 


7 4 4 





706 


754jZ0? 


1 


70 7 


74?0?0 


a 


'710 


74?0?0 


^ 


'71 t 


74?020 


;1 


71? 


74?0?0 


51 


71 3 


7 4 ? ? 


^ 


'714 


74?0?0 


0. 


715 


7 4 ? ? 


0' 


'71 6 


7 4 ? ? 


0! 


71 7 


7 4 ? ? 


0; 


'7?0 


7 4 16 


0' 


7?1 


7 4 4 



1 1 4 



/ 

/ T i S 1 



RTI 



/ T t S T R T R 



!C*L 



/AC 



L INK 



RAl 
R A. L 



I. i i 
RAl 
RAl. 
RAl 
WAI 
RAl 
RAI 
RAl 
RAl. 
SNA 
MA 



I T 



/ERROR ; 
/AFTFR 



AC SIT NOT 
ROTATE SERIFS 



OR LINK 



SERIFS 

c la : n l i 

RTI 

RTF 

RTI 

RTi 

RTI 

RTI. 

RTI 

RTI 

RTI 

S 1 A ! S ? I 

HAI T 



A NO 
!CM1 



LINK 



/AC = 0, LINK = 1 



/ERROR! AC BIT NOT 
/AFTFR ROTATF SERIES 



1 , OR LINK 



SF> 

CLA 
RTR 
RTF 
RTR 
RTR 
RTR 
RTR 
RTR 
RTR 
RTR 
SNA 



IFS 
!CLI 



AND 
!CM1 



LINK 



/AC 



LINK = 1 



S?l 



f 1 1 6 HALT 

/PDP-9 RASIC EXERCISFR - TAPE 



/ERROR; AC BIT 17 MOT 
/AFTFR ROTATF SERIFS 
? 



OR L INK = 1 



,A--FV9 
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:^7?2 
0"72 3 
00724 

r-'7?5 

0C726 
'.H 7?7 
01-730 
G0731 
00732 
00733 
00734 
00 735 
0073 6 
00737 
00740 
0P741 
00742 
01*74 3 
0C744 
0P745 
0(/746 
00747 



750 
0(?751 
00752 
00753 
0?/754 
00755 
00756 
00757 
00760 
00761 
00762 
00763 
00764 
?"765 
00766 
00767 
00770 
00771 
■• 7 7 2 
0"773 
7 7 4 
0i'775 



754001 

7 4 P! ? 

740020 

740020 

740020 

7 4 00 20 

740020 

740020 

740020 

740020 

740020 

740020 

740020 

740020 

740050 

740020 

740020 

740020 

740020 

740003 

741 600 

740040 



754001 
740010 
740010 
740010 
74001 
74001 
740010 
740010 
740010 
740010 
740010 
740010 
740010 
740010 
740010 
7 4 010 
7 4 1 
7 4 0011/ 
74001 
74000? 
741 500 
7 4 4 



/ 

/RAR SERIES 

.'TSS CLA U:»: !CLl. 

RAR; RAR; 



RAR 



RA«; 

CmA 'Chi 
SNA -SZL 
E 1 4 HALT 

/ 

/ 

/TfcST RAL SERIES TEST 
CLA'CMA :CLL 
RA| ; RAL ! 



f'l"l 



RAl 



RAl 



RA| ; 



RA ( ; 



spa :s?« 

HALT 
.EJECT 



RA L 1 



R*L 



/AC = ONES, LINK 
RAR; RAR 



HAt-J RAR; RAR; 



RAR 



hap; rap; r a r ; r a r 



rap; RAr; RAR; 



RAR 



/AC = 000001. LINK = 

/ERROR! AC PIT 17 NOT 1. , OR LINK 
/AFTER ROTATE SERIFS 



/AC r ONFS, LINK - 
RAL! RAL 



RAL! R a l J RAL 



ral; R a l i 



RAL 



R A |_ ; R A l 



Cml 



/AC = 377777, [.INK = 



/ERROR; AC PIT ^OT 0» OR LINK = 
/AFTER ROTATE SERIFS 



i 6 . F y Q 



' <) PAGE 


1 7 


-v-776 


754J/01 


0>'777 


742010 


0* PI 


74201 


Hi 001 


742010 


0< 00? 


742010 


01 003 


742010 


«'B«4 


74201.0 


?< 005 


742010 


1 006 


742010 


01 007 


74201 


511 010 


74000? 


1011 


741500 


<"1 012 


740040 





1 013 


754001 


M- 


' 014 


742020 


0- 


' 015 


742020 


0' 


'016 


742020 


0" 


101 7 


7420?0 


0' 


1 0?0 


742020 


0- 


' 0?1 


742020 


' 


0?2 


742020 


0- 


! 023 


742020 


0' 


024 


742020 


0' 


025 


740003 


0^ 


026 


741 600 


01 


027 


740040 



/TfST RTL SE'-IFS 

CI A !CMA !CLL 
RTl ; RTL ; 



»Ti. ; WTI.; 



rtl; cml 

SP* !S?i 
(■'14 2 HALT 

/ 

/TFST RTR SERIFS 

CLA !CMs !CLL 

rTr; rTr; 



E 1 4 3 



RTRi 



RTR 

CMA !Cmi 
SNA JS2L 
HALT 

.EJECT 



RTr; 



/AC r ONES, LINK = « 
RTLi RTL 



RTL; 



RTL 



/LINK = 



/ERROR; AC BIT NOT 0. OR LINK = 
/AFTFR ROTATE SERIES 



/AC = ONES, LINK = 
RTR; RTR 



RTR! 



RTR 



/AC = 000001, L'NK = 

/ERROR; AC BIT 17 NOT 1, OR LINK 
/AFTFR ROTATE SERIES 



sAsEv9 
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/Tf ST 


RAI 


! SNA 




1 0^0 


754 002 






CLA !CLI 


•.CHI 


010 3 1 


7 4 1 2 1. 






P A 1 ! S N A 




M 1 « 3 2 


741000 






SKP 




310 3 3 


7 4 00 4 


F162 
/ 

/TFST 




HALT 








R A R 


: S N A 




0i 34 


754002 






gla;cll 


!CML 


0i 035 


741220 






W A (< ! S N A 




01 036 


741000 






SKp 




01 037 


740040 


F 1 6 3 

/ 

/TFST 




HAI T 








RTL' 


"SNA 




01040 


754002 






TLA ! CLI 


!CML 


01 041 


743210 






R T i ! S N A 




01042 


741000 






SKp 




01043 


740040 


F 164 

/ 

/TFST 




HALT 








RTR 


•SNA 




01044 


754002 






CLAICLI 


!CML 


01045 


743220 






RTRISN* 




01 046 


741000 






SKP 




01 047 


740040 


El 65 

/ 

/TEST 




HAL T 








RAL 


!SNA 




01050 


754002 






CLA !CLI. 


!CML 


01051 


740020 






RAR 




01052 


741210 






SNA ! RAL 




01053 


740040 


E166 

/ 

/TEST 




HALT 








PAR 


!SNA 




01 054 


754002 






CLA'CLL 


!CML 


01 055 


740010 






RAL 




01056 


741220 






SNA !RAR 




01057 


740040 


E167 




HALT 
.EJECT 





/AC = 0, LINK = 1 



/ERROR; SNA SK 1 PPEfl 



/AC = 0, LINK = 1 



/ERROR; SNA SKIPPER 



/AC = 0, LINK = 1 



/FRROR; SNA SKIPPED 



/AC = 0, LINK - 1 



/FRRDR; SNA SKIPPED 



/AC = 0, LINK = 1 
/AC = 400000 



/ERROR. SNA FAILED TO SKIP 



/AC = 0, LINK = 1 
/AC = 000001 

/ERROR! SNA FAILED TO SKIP 



< 4 • F v o 



PifiF 19 



/TFST RTL 



7 


' 060 


.;/ 


•' flfil 


■1 


106 2 


•? 


1 06.1 


/ 


064 


01 


065 


PI 


066 


01 067 





070 


01 


071 


01072 


01 


073 


■31 


074 


a- 


075 


01 


076 



754^02 
742020 
741210 
7 4 4 



754'/02 
742010 
741220 
740040 



754«01 
751220 
740040 
447631 
600620 
106102 
1061 26 



(■"168 

/ 

/TFST 



F169 

/ 

/TEST 



F170 



SNA 

OLA !CU. !CML 

» T R 

SN* ! PT» 

NAl T 

RTP'SNA 

CL* !CLI. !CMl. 

RTI 

SNA !RTi' 

HALT 

CLL !SNA !RAR 

CLA !CMA 'CLL 

C|_A !SNA !RAR 

HALT 

IS? W0HK3 

JMP RTsT 

JMS GENRAN 

JMs CKNO 



/AC = 0, LINK = 1 
/AC = 200000 

/ERROR; c;NA FAILED TO SKIP 



/AC = 0, LINK = 1 



/FRROR; SNA FAILED TO SKIP 



/AC = ONFS, LINK = 

/ERROR; SNA FAILED TO SKIP 
/CHFCK OONE LOOPING 
/LOOP 

'GET NO FOR NEXT LOOP 



.EJECT 



■, A S E y 9 
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01 077 

01 100 

01101 
0' 102 
1103 


754000 
760000 
74001 
744490 
7 400 40 


01 104 
0110 5 
0110 6 


740010 
744400 
7 4 4 


01 107 

01110 
01111 


740010 
744400 
740040 


01 112 
01113 
01114 


740010 
744400 
740040 


71 1 115 
01 116 
01 117 


740010 
7 4 4 4 00 
740040 


01120 
01121 


740200 
740040 



01 122 
01123 
01 124 
01125 
01126 
01 127 
0113 

01131 
01 132 
01 133 



754001 
760000 
741400 
740040 
74001.0 
744400 
740040 

740010 
744400 
740040 



/ 

/TFSr LAW 760000 

TLAW CLAiCLI 

L A '.: </• < 1 

RAL 

SNI !CI. I 
FJ06 HALT 

RAL 

SNI ! CLI 
F207 HAt.T 

RAI 

SNI ! CLI 

f 2 8 H A I T 

RAI 

SNI iCLI 
F 2 9 HALT 

RAL 

SNI. !CLL 
F210 HALT 

SZA 
F-211 HALT 

/ 

/TFST LAW 760000, AC = ONES 

CLA'CMA !CLL 

LAW 00000 

S2I. 
F212 HA| T 

RAL 

SNLiCLL. 

HALT 



F213 



F214 



RAL 

SNL !CLI 
HAi T 



/AC = 

/AC = 760000 

/AC = 74000 

/LINK = 1 

/FRROP; AC NOT NOT A 1 , 

/LAW 760000 FAILFD 

/AC = 700000 

/LINK = 1 

/ERRnR: AC BIT 1 NOT A 1 

/LAW 760000 FAILED 

/AC = 600000 

/LINK i 1 

/frRROR! AC R I T 2 NOT A 1 

/LAw 760000 FAILED 

/AC = 400000 

/LINK = 1 

/ERROR! AC BIT 3 NOT A 1 

/LAW 760000 FA1LFD 

/AC = 000000 

/LINK = 1 

/ERROR; AC BIT 4 NOT A 1 

/LAW 760000 FAILED 

/AC = 000000 

/ERROR; AC HITS 5-17 NOT 

/LAW 760000 FAILFD 



/AC = ONES, LINK = 
/AC = 760000 

/ERROR; LINK NOT A 0, LAW SET LINK 

/AC = 740000 

/LINK = 1 

/ERROR! AC BIT NOT A 1, 

/LAW 760000 FAILED 

/AC = 700000 

/LINK - 1 

/ERRnR! AC BIT 1 NOT A 1 

/LAW 760000 FAILFD 



Hi 134 
01 135 
01 136 

01 137 
01 140 
01141 
01142 
1 1 4 3 
0114 4 
01 14 5 
01 146 



7 4g0l0 
744400 
740040 

740010 
744400 
740040 
740010 
744400 
740040 
740200 
740040 



f 215 

F216 

F?17 
F?18 



RAI 

SNL iCLI 

HALT 

RAI 

SNL i CLI 

H*L T 

RAI 

SNI ! CLI. 

HALT 

S2A 

HAL T 



/AC z 600000 

/LINK = 1 

/ERROR; AC BIT 2 NOT 

/LAW 760000 FAILED 

/AC = 400000 

/LINK s 1 

/ERROR! AC BIT 

/AC = 000000 

/LINK = 1 

/ERROR! AC BIT 4 NOT A 1, LAW 760000 FAILED 

/AC = 000000 

/ERROR! AC BITS 5-17 NOT 

/LAW 760000 FAILFD 



A 1 



3 NOT A 1, L*W 760000 FAILED 



iA FYQ 



P 4 G £ ? 1 



.EJECT 



<A^F*9 
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01 147 
01 150 


754000 
777777 


/TEST 


LAW 777777. AC = 0. 1 =0 
CLA 'CL1 
I.Aw 17777 


/AC = 

/AC = 760200 


01151 


740001 




CM A 






01152 
01 153 


740200 

740040 


F21 9 


S?A 
HAl T 




/ERROR. AC NOT 
/LAW 17777 EARED 


01 154 
01 155 


741400 
740040 


1- 220 

/ 

/TEST 


S2l 


HALT 


/AC = 400760 

/LINK NOT 


01 156 
01 157 


754002 
777777 


LAW 777777- A C = . L = 1 
fLi !cLl. !C M L 
L AW 17777 


/AC = <* 


01 160 
01 161 
01 162 


740001 
740200 
740040 


F221 


OMA 

S?A 

HALT 




/FRROR. LINK NOT 


01163 
01 164 


740400 
740040 


F222 
/ 

/TFST 


SNL 
HALT 




/ERROR. LINK NOT 


01 165 
01 166 


754001 
777777 


LAW 777777. AC = 1, L =0 
CLA !CU !CLL 
I A w 17 7 7 7 


/AC = 


01 167 
01 170 
01 171 
01 172 
01173 


740001 
740200 
740040 
741400 
740040 


E223 
E224 


CMA 

S?A 

HAl. T 

S2I 

HALT 

.EJECT 




/FRROR, AC NOT 
/AC = 100760 
/FRROR. LINK NOT 



<* FY9 



9 


PAGE 


23 


& 


t?1 


7 5 4 •?: .3 


fit 


175 


777777 





176 


740001 


'A 


1 77 


740?00 


:h 


200 


740040 




201 


740400 


•■/• 


202 


740040 


?' 


203 


4 4 7 6 33 





204 


6010 7 7 


0H 


205 


1 06102 


0< 


206 


1061 26 



/ T F S T I. A i 



f?? c . 



E226 



777 7 77, A C = 1 , 1=1 

CL A !CM,< !CLL!CM[ 

I A ..- 17 7 7 7 

C H .'. 

S?a 

HAl T 

SNI 

HAl T 

IS/ W P K 3 

JMP TL^H 

J M S G e n RAN 

JMS CKNO 

.EJECT 



/AC = 



/ERROR, AC MOT 

/ERROR, LINK NOT 1 
/CHECK DONE LOOPING 
/LOOP 

/GET NO. FOR NEXT LOOP 



<a;F*9 
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/TEST 


1. " C ' C ' 


01207 


754000 


/ 

LACK 


CLA !CLi 


01 210 


2 7 5 3 V 




i A ( : k id 


1 2 1 1. 


7 4 2 




Sft 


01212 


740040 


'■■ ?hf>- 


MALT 


01 213 


7 4 1 4 




S 21 


fl 1 2 1 4 


7 4 00 4 


E 259 

/ 


HALT 


01215 


75400)2 


r.H ! CLi !CML 


01216 


207530 




LAC K0 


511 217 


740200 




S?* 


01 220 


740040 


f 2 ft 


HALT 


01221 


740400 




SNl 


01222 


740040 


E 26 1 

/ 


HALT 


01223 


754001 


CLAICHA'CLL 


01224 


207530 




LAC K 


01225 


740200 




SH' 


01 226 


740040 


F 2 6 2 


HALT 


01227 


741400 




SHI 


01 230 


740040 


E?6 3 


HALT 


01231 


7 5 4 3 


/ 


CL* !CMA !CLL!CML 


01 232 


207530 




LAC K0 


01 233 


740200 




S?A 


01 234 


740040 


F264 


HALT 


01235 


740400 




SNL 


01 236 


740040 


F265 

/ 

/TEST 


HALT 






LAC l'S 


01 237 


754000 


/ 


OLA iCLI 


01 240 


20757? 




LAC K 7 S 


01241 


740001 




CMA 


01 242 


740200 




Sit 


01243 


740040 


F266 


HAl T 


01244 


741400 




S?L 


01245 


740040 


F267 
/ 


HALT 


■ 1 2 4 6 


75400? 


CLA <CU !CHL 


01 247 


20757? 




[AC K 7 S 


0i 250 


740001 




CM A 


01 251 


7 4 ? 




S2A 


01252 


7 4 4 


E26fl 


HAl T 


012-53 


740400 




SN! 


01 254 


740040 


t ?69 


HAL T 
.EJECT 



/AC = 0, LINK = 
/0007I00 

/ERROR. AC NOT AETF" LAC K0 

/FRROR; I INK NOT AFTER LAC K0 

/AC = 0, LINK = 1 

/FrrOr; AC NOT 

/ERROR, LINK NOT 1 AFTER LAC K0 

/AC = 1 'S, LIN = 

/FRROR, AC NOT AFtER LAC K0 
/FRROR. LINK NOT /. AFTER LAC K0 
/AC = 1 'S, LINK = 1 

/FRROR. AC NOT 
/ERROR. LINK NOT 1 

/AC - 0, LINK - 
/777777 

/ERROR. AC NOT LAC K7S FAILED 
/ERROR. LINK NOT Afl£9 LAC K7S 
/AC : 0, LINK = 1 

/FRROR. AC NOT 

/ERROR. LINK NOT 1 AeTeR LAC K7S 



P A C, F 2 5 






255 




' 2^6 





257 


>;> 


260 





1 261 





i 262 





1 ?63 


1,1 


264 





?65 





266 





267 





270 





273 


01 27? 


01 


273 


0' 


274 


01 


27*5 





276 





277 


PI' 


300 


0< 


301 


01 


302 


0' 


303 


0- 


304 


0- 


305 



.1 


306 





1 307 





310 





311 


01 31? 





313 





31 4 





315 


01 31 f, 


0" 


317 





3?0 


01 


321 


0* 


322 





323 


0' 


3?4 


01 325 


01 


3?6 



7 5 4 ■:■•■ 1 
2 7 5 7? 
7 4 1 
7 4 2 
7 4 4 
741 400 
740040 

754 003 
20757? 
740001 
740200 
7 4 4 
740400 
7 4 4 

750000 
207605 
207604 
207572 
740001 
740200 
7 4 00 4 
4 4 7633 
601 207 
1061 02 
1061 26 



750000 
507530 
7 4 2 
740040 

750001 
507530 
740200 
740040 

750000 
507572 
740200 
740040 

750001 
507572 
740001 
740200 
740040 



F2 70 

£271 
/ 



£272 



£273 



/ 

/TI-ST AND 

/ 

A N D A C 



f 274 
/ 



£275 
/ 



£276 
/ 



£277 



L A ! C M A ! C L L 

1 A ( '• K 7 . 
C 'I I 

MAI. T 
SZi 
HAl T 

CIA !CMA !CLL!CML 

LAC K7S 

CM A 

SZa 

HAl T 

SNI. 

HALT 

CLA 

LAr K101 

LAC K 1 

LAC K7S 

CM A 

SZA 

HALT 

IS? W0HK3 

JMP LACK 

JMS GE'JRAN 

JMS CKMO 



CLA 

AND K0 
SZA 
HAl T 

CLA <CMA 
ANO K0 
SZA 
HALT 

CLA 

ANn K7S 
SZA 
HAL T 

CLA !CMA 

ANn K7S 

CMA 

SZA 

HALT 

.EJECT 



/AC i 1 'S, LINK - 

/ERROR. AC NOT 8. LAC K7S FAILED 
/ERROR. LINK NOT 1 AFTER LAC K7S 
/AC = 1 'S, LINK = 1 

/ERROR. AC NOT 

/ERROR. LINK NOT 1 AFTER LAC K7S 



/AC s 525252 
/AC = 25?5?5 
/AC : 777777 



/ERROR. AC NOT 

/CHFCK FOR DONE LOOPING 

/LOOP 

/GET NO. FOR LOOP 



/AC = 

/ERROR. AC NOT AFTER AND K0 
/AC = 1 'S 

/ERROR. AC NOT AFTER ANO K0 
/AC = 

/ERROR. AC NO T AF T FR ANO K7S 
/AC = 1 'S 

/FRROR. AC NOT AFTFR AND K7S 



< A S E x 9 



PAGE 







/SFOUFNTIAL AND 


eii 3?7 


7540 0? 


/ 


CLA !OLL !CMI. 


»H 3 3« 


5P753!' 




AMI! K* 


01 331 


50 7 5 7? 




ANP K7S 


01 33? 


5(»7605 




AN! 1 Kl '1 


01 333 


507604 




ANP K010 


01 334 


740001 




C H A 


: ^1 335 


507530 




ANP K0 


01 336 


50757? 




ANP K7S 


01 337 


507605 




ANP Kl'l 


01340 


507604 




AND K010 


01341 


740?00 




S2A 


»1 34? 


740040 


P'278 


HALT 


01 34 3 


740400 




SNI. 


01 344 


7 4 4 


F279 


HALT 


31345 


447633 




IS? W0'»K3 


<*•> 346 


601306 




JMP ANUAC 


01 347 


10610? 




jHs GENrAN 


01 350 


106126 


/ 

/TEST 

/ 

XORAO 


JMS CKNO 






X M 


01 351 


75 00 


CLA 


01352 


247530 




XOR K0 


01353 


740700 




SZA 


01 35 4 


740040 


E?80 
/ 


HALT 


01355 


750001 


CLA !CMA 


01 356 


247530 




XOR K0 


01 357 


740001 




CHA 


01 360 


740?00 




S?A 


01361 


740040 


F2S1 
/ 


HAL T 


01 362 


750000 


CLA 


01 363 


24757? 




XON K7S 


01 364 


740001 




CmA 


01365 


740?00 




S?A 


01 366 


740040 


E282 
/ 


HALT 


1 3^7 


75 0001 


C L A ! C M A 


0- 3 70 


24 757? 




XOR K7^ 


01 371 


740200 




S?A 


01372 


740040 


F?f-3 


HAI T 
.EJECT 



/AC = 0, LINK 



/ERROR. AC NOT 

/fRROR. LIMK NOT 1 
/CHECK FOR DONE LOOPING 
/I OOP 
/GET NO. FOR NEXT LOOP 



/AC = 

/ERROR. AC NOT AFTER XOR K0 
/AC = 1 *S 

/ERROR. AC NOT 

/AC = 
/777777 

/ERROR. AC NOT AFtER XOR K7S 
/AC = 1 *S 

/ERROR. AC NO T AF T ER XOR K7S 



■:A -FY 9 
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/SFQUENTIAI XOR 


3*373 


750000 


/ 


CL' 


1 3 7 4 


247605 




XOR Kl '1 


PS' 375 


247604 




XQR Kfl', 


01 376 


247530 




XOR K0 


01 377 


24757? 




XOR K7S 


01 400 


247604 




XOR K010 


5)1 401 


247605 




XOR Kl 11 


1 4 A 2 


247605 




XOR K101 


01 403 


247604 




XOR K010 


0i 404 


740200 




SZA 


01 405 


740040 


F284 
/ 


HALT 


7, 1 4 6 


4476J3 


1SZ W0»K3 


0i 407 


601 351 




JN!P XO°AC 


•A ■>. 4 1 


1061 02 




JMS GENRAN 


01411 


1061 26 




JMS CKNO 






/ 

/TEST 

/ 

TAOAC 


T40 


0-412 


754000 


CLA !CLI 


01 413 


347530 




TAD K0 


01414 


740200 




S?A 


01415 


740040 


E285 


HALT 


01 41 6 


741 400 




SZL 


01417 


740040 


F 2 86 
/ 


HALT 


J ' 420 


754^01 


OLA!CMA!CLL 


01 421 


347530 




TAD K0 


01 422 


740001 




CMA 


0" 423 


740200 




SZA 


01 424 


740040 


F287 


HALT 


01 4?5 


741 400 




SZL 


01 426 


740040 


E288 
/ 


HALT 


01427 


754002 


CLA'CLI. !CML 


01430 


347572 




TAD K7S 


014 31 


740001 




CmA 


01 432 


740200 




SZA 


01 433 


740040 


E289 


HALy 


0" 434 


740400 




SNL 


01 435 


740040 


E290 


HALT 


01 436 


754H01 


/ 


CLA !CMA !CLL 


01 437 


347572 




TAD K7S 


01 440 


740020 




RAR 


01 441 


740001 




CMA 


01 442 


740200 




SZA 


01 443 


740040 


E 2 9i 


HALT 


01 444 


741400 




SZL 


01 445 


740040 


E292 


HALT 
.EJECT 



/AC = 

/525252 
/252525 
/000000 
7777777 



/ERROR. AC NOT 

/CHECK FOR DONE LOOPING 

/LOOP 

/GET NO. FOR NEXT LOOP 



/AC = 0, LINK = 

/ERROR. AC NOT AFTER TAD K0 
/ERROR. LINK NOT AFTER TAO K0 
/AC r l'S, LINK s 

/ERROR. AC NOT 

/fRROR. LINK NOT 

/AC = 0, LINK = 1 
/777777 

/ERROR. xAD K7s FAILEO 

/ERROR. CARRY OUT OR OVERFLOW 
/FAILED. LINK NOT 

/AC = l'S, LINK r 



/ERROR. TAD K7S TO i'S FAILED 
/ERROR. LINK NOT 



■jA^EX' 
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/ T E S T 


OVERFLOW 




01 446 


754001 


/ 


CLA!CM/. 


•CLL 


01 447 


347531 




TAii K1 




014 5 


740?00 




S?A 




01 451 


7 4 4 


F?9 3 


HALT 




01 45? 


740400 




SMI 




01 453 


7 4 4 


E?94 
/ 


HALT 




01 454 


754f /5 ,3 


C L A ! H H i 


:CLL !CMt 


01 455 


347531 




T*n ki 




0^ 456 


740?00 




SZA 




01 457 


740040 


F295 


H A I. J 




01 460 


741400 




SZL 




01 46l 


740040 


E296 


HALT 





/AC = 1 'S, LINK 
/000001 







01 462 
01 463 
01464 
01 465 
0i 466 
0i 467 
01 470 
01471 



01 472 
01 473 
01 474 
01 475 
01 476 
01477 
01500 
01501 



a 1 502 
01 503 
0^504 
01505 
01 506 
01507 
0i 510 



754000 
347604 
347605 
740001 
740700 
740040 
741400 
740040 



75^00? 
347605 
347604 
740001 
740?00 
740040 
740400 
740040 



7 , ' 4 000 
207604 

347605 
247604 
347604 
347531 
74 4 00 



/FRRflR. AC NOT AFTER T A K 1 
/ERROR. LINK NOT 1 OVFRFLOW FAILED 
/AC - 1 'S, LINK - 1 

/FrrOr. AC NOT 

/ERROR. LINK NOT OVERFLOW FAILEO 



/ 

/TAD 5?5?52, AC = ?5?525, LINK = 

/ 

CLA !CLL 

T A (1 K010 

TAII Kv/l /AC = 1 *s 

CMA 

SZA 
E297 HALT /ERROR. AC NOT 

SZL 
E ?98 HALT /rRROR. LINK NOT 

/ 

/TAD 25?5?5, AC - 5?5252, LINK = 1 
/ 

OLA'CLI !CML 

TAr. Kl'l 

T A K 1 

CMA 

SZA 
E?99 HALT 

SNL 
E300 HALT 

/ 

/SEQUENTIAL LAC, TAD, XOR 
/ 

CLA !CLI 

LAr K 1 

T All Kl '1 

XOR K 1 

TAP K 1 

TAP K1. 

SNI 

.EJECT 



/AC ' 1 'S 

/ERROR. AC NOT 
/ERROR. LINK NOT 



/AC = 0, LINK = 
/AC = 1 'S 
/AC = 1 'S 



- A - F V 9 



9 PAGE 


29 


31511 


7 4 4 


01512 


207605 


01513 


247572 


1514 


347605 


01 515 


247572 


5H516 


740200 


01517 


740040 


ai 520 


4 4 76 33 


01521 


6 1 4 I ? 


01522 


106102 


01523 


1061 26 



01524 
01525 
01 526 
01 527' 
0i 530 
01531 
0^532 
01533 



01534 
01535 
0i536 
0-537 
01540 
01541 
01 542 
01 543 



01544 
01 545 
01 546 
0<547 
01 550 
01 551 
01552 
01553 



01 554 
01 555 
01556 
01557 
01 560 
01 561 
01 562 
01563 



754030 
307564 
307571 
740001 
740200 
740040 
741400 
740040 



754000 
307565 
307570 
740001 
740200 
740040 
741 400 
740040 



754000 
307566 
307567 
740001 
740200 
740040 
741400 
740040 



754000 
307567 
307566 
74 00 01. 
740200 
740040 
741400 
740040 



■301 



F30 2 



/ 

/ 

/TEST 

/TEST 

AODAC 



E3«3 

F304 

/ 

/TEST 



E305 

F306 

/ 

/TEST 



F307 

f-308 

/ 

/TEST 



E309 



F310 



ADD 



AOO 



ADO 



HAl T 

LAC 

XOR 

TAD 

XQP 

SZi 

HAL1 

IS? 

JMP 

JMS 

JMS 



K1 *1 
K7S 
Kl -1 

K7S 



W04K3 
TADAC 
GE ? -JRAN 
CKNO 



/ERROR. LINK NOT 1 



/ERROR. AC NOT 
/CHECK DONE LOOPING 
/LOOP 
/GET NO. FOR NEXT LOOP 



ADD 
ADD 



K1S TO K6S, LINK 

CLA'CLI. 

ADD KlS 

ADD K6S 

CMA 

SZA 

HALT 

SZL 

HALT 



K2S TO K5S, 

CL*!CLL 

ADD K2q 

ADD K5S 

CMA 

SZA 

HALT 

SZ1 

HALT 

K3S TO K4S, 

CLA'CLL 

ADO K3S 

ADD K4S 

CMA 

SZA 

HALT 

SZL 

HALT 



K4S 

CLA 

ADD 

ADD 

CMA 

SZA 

HALT 

SZL 

HALT 

.EJECT 



LINK 



TO K3S, LINK 

CLI 

K4S 

K3S 







/AC = 0, LINK = 

/U1111 

/666666 

/AC = 

/ERROR; ADD KiS TO K6S FAILED 
/ERROR! LINK NOT A0 



LINK = 



/AC . LINK = 
/22?22 
/555555 
/AC = 

/ERROR; ADD K2S TO K5S FAILED 

/ERROR! LINK NOT A 



/AC, LINK =0 
/33333 
/444444 
/AC = 

/ERROR! ADD K3S TO K4S FAILED 

/ERROR! LINK NOT A0 



/AC, LINK =0 
Z444444 
/333333 
/AC = 

/ERROR; AND K4S TO K3S FAILED 

/ERROR! LINK NOT A0 



,A^ E Y9 
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01564 
01565 
01566 
0<567 
01 570 
01571 
01572 
01575 



01574 
0^575 
01576 
01577 
01 600 
01 601 
01602 
01603 



01 604 
01 605 
01 606 
01607 
01 610 
01611 
01612 
01613 



01614 
01 615 
01616 
01617 
01620 
016?1 
01 6?2 
01 623 



fl 1 6 2 4 
01625 
01 626 
0<627 
01 630 
01 631 
01 632 
01633 



7 5 4 
307570 
307565 
7 4 01 
740200 
740040 
741400 
740040 



754000 
307571 
307564 
740001 
740200 
740040 
741400 
740040 



754000 
307572 
307530 
740001 
740200 
740040 
741400 
740040 



754001 
207605 
307604 
740001 
740200 
740040 
741400 
740040 



744000 
207604 
3n76(j5 
740001 
740200 
740040 
7 414 00 
740040 



/TFST 



F311 

f-312 

/ 

/Tf ST 



E313 

E314 

/ 

/TEST 



F315 

E316 

/ 

/TEST 



F-317 

F318 

/ 

/TFST 



F. 319 

F3?0 



LINK = 



Aflll K5S TO K2S, LINK = 
CLAICLI 

Ann K5s 
a n p k 2 s 

CM A 

SZA 

HALT 

S2L 

HALT 

AND K6S TO K1S. 
CLA !CLI 
ADO K(,S 

Ann kis 

CMA 

SZA 

HALT 

SZI 

HALT 

AOD K7S TO K0S, LINK = 
CLA !CL1 
ADD K7S 
AO(l K0 
CMA 
SZA 
HALT 
SZL 
HALT 

AOD 252525, AC 
C|_L!CLA!CMA 
LAC Kl«l 
A OD K010 
C H A 
SZA 
HALT 
SZI 
HALT 



/AC, LINK = 
/555555 
/222222 
/AC = 

/FRROR; ADO K5S TO K2S FAILED 

/FRROR! LINK NOT A0 

/AC, LINK = 
/666666 
/111111 
/AC = 

/ERROR! ADO K6S TO KiS FAILED 

/FRROR! LINK NOT A 



AOD 525252. 
CLL 

LAC K01 
AOD Kl, 

CM* 
SZ'' 

HALT 
SZI 
HALT 
.EJECT 



AC 



/AC, LINK = 
/777777 

/000000 

/AC - 

/ERROR! AOD K7S TO K0S FAILED 

/ERROR; LINK NOT A 

s 525252, LINK = 

/AC = ONFS, LINK = 
/AC s 525252 
/AC = 252525 
/AC = 

/ERROR! AOD Ki0l TO K010 FAILED 

/FRROR; LINK NOT A 

s 252525, LINK : p 
/LINK = 
/AC = 252525 
/525252 

/AC = 

/FRROR; 400 K010 Tf K ic'l FAILED 
/ERROR; LINK NOT A? 



>A'-FV9 



PACE 31 



/TFST Ann K7S, AC 



K400K, LINK = 



■i' 634 


7541/01 


01 635 


207553 


:•" 636 


30757? 


Mi 637 


50757? 


0-640 


247553 


1 641 


740?00 


"1 64? 


740040 


0i 643 


741 400 


01 644 


740040 


01 645 


7 5 4 01 


0i 646 


207557 


016 4 7 


307557 


01 650 


50757? 


01651 


247553 


01 652 


740200 


(711 663 


74fjfl40 


01 654 


740400 


01 655 


740040 


0i 656 


754003 


1 657 


207320 


01660 


30757? 


01 661 


50757? 


01662 


247320 


01 663 


740200 


01 664 


740040 


01665 


740400 


01666 


740040 


01667 


764001 


01670 


20755? 


01671 


30757? 


01672 


50757? 


01673 


24755? 


01 674 


740?00 


.^675 


740040 


01 676 


741400 


01 677 


740040 



F321 



F322 

/ 

/TEST 



F323 

F324 

/ 

/TEST 



F325 

F326 

/ 

/TFST 



E327 
F328 



CLA !CMA!CLL 

LAC K4/0K 
ADn K7- 
AND K7S 
XOK K4-/10K 
S2A 
HAl T 
S?l 
HAl T 

ADD K200K, AC r 
CLA !CMA !CLL 
LAC K?-)0K 
AO(1 K200K 
AND K7S 
XOR K4H0K 
S2A 
HALT 

SNl 
HALT 



K200K, 



/AC = ONES, LINK = 

/AC - 400K 

/ONES 

/AC = 400K 

/AC s 

/ERROR! ADD-0 TO K400K FAILED 

/ERROR! LINK NOT A 0, CARRY FAILED 

LINK = 
/AC = ONES, LINK = 
/AC = 200K 
/ONES 
/AC = 400K 

/AC = 

/ERROR; ADO K2flgK TO K200K FaILED 



/Error; link not a ones, carry failed 

ADD K7S, AC = K100K, LINK s 1 



CL*!CMA!CLL!CHL 

LAC K100K 

ADD K7S 

AND K7S 

XOR Kl«0K 

S2A 

HALT 

SNL 

HAl T 



/AC = ONES, LINK s 1 

/AC = 100K 

/ONES 

/AC = 100K 

/AC = 

/ERROR; ADD-0 TO KI00K FAILED 

/ERROR! LINK NOT A ONE, lInK RESET 



ADD K7S, AC - K40K, LINK s 

CLA!CM»!CLL /AC : ONES, LINK = 

LAC K40K /AC = 40K 

AOD K7S /ONES 

AND K7S /AC s 40K 

XOR K40K 

SZA /AC = 

HALT /ERROR; ADD-0 TO K40K FAILED 

SHL 

HALT /ERROR! L I nK NOT A ZERO. CARRY FAILED 

.EJECT 



<ASE*9 



PAGE 3? 



01 7PI 


01 701 


01 70? 


01 703 


01 704 


01 705 


0170 6 


01 707 


01 710 


01 711 


01712 


01713 


01 714 


01715 


01716 


01717 


017?0 


017?1 


01 722 


01723 


01724 


01 725 


01 726 


01727 


01 730 


01731 


01732 


01733 


01 734 


01 735 


01 736 


01737 


01 740 


01741 


01 742 


01 743 



7*4001 

?07'=.5* 
30757? 
50757? 
24755<S 
7 4 20 
7 4(1040 
741400 
740040 



754001 
207555 
307572 
507572 
247555 
740200 
740040 
741400 
740040 



754001 
207547 
307572 
507572 
247547 
740200 
740040 
741400 
740040 



754001 
207545 
307572 
507572 
247545 
740200 
740040 
741400 
740040 



/TEST ADD K7S, AT = K20K, LINK 

ni* • cH* :cll 

LAO K2.'K 
AOL K7° 
ANT) K7S 
XOB K? <« 
SZA 
HA1 T 
S2L 
HAL T 



t 329 

f 3 30 

/ 

/ T L S T 




/AC = ONfS, LINK = 
/AC = 20K 
/ONFS 
/AC = 20K 

/AC = 

/ERROR; ADD-0 TO K20K FAILED 

/error: LINK NOT A ZERO, carry failed 



E331 

F332 

/ 

/TEST 



F333 

E334 

/ 

/TEST 



E335 

f 336 



AND K 7 S , AC 1 K10K, LINK = 

cLA!c M *!cLL /Ac = ONfS. LINK = 

LAC Kl'iK ' /AC = 10K 

ADD K7^ /ONES 

AND K7S /AC = 10K 

XOR K10K 

SZA /AC = 

HALT /FRROR: AOD-0 TO K10K FAILED 

HALT /ERROR! LInK NOT A ZERO. CARRY FAILED 

ADO K7S, AC s K4K, LINK = 

CLA'CMA!CLL /AC = ONFS. LINK = 

LAC K4K /AC = 4K 

ADO K7S /ONES 

AM!) K7S /AC = 4K 

XOR K4K 

SZA /AC r 

HALT /ERROR! AOO-0 TO K4K FAILED 

SZl 

HALT /ERROR! LINK NOT A ZFRO, CARRY FAILED 

ADD K7S, AC = K2K, LINK - 

CLA!CMA!CLL /AC = ONES. LINK = 

LAC K2K /AC = 2K 

AOD K7S /ONFS 

AND K7S /AC = 2K 

XOR K?K 

SZA /AC = 

HALT /ERROR! AOD-0 TO K?K ? FAILED 

SZL 

HALT / F RRORi LINK NOT A ZeRO, CARRY FAILED 

.EJECT 



■ A rv 9 



! > AGF 3 3 



/TEST ahd K7 



:/t -744 
^ 1 745 

!A ' 7 4 6 
i 7 4 7 
0i 7 50 
^1 751 
7 W 1 ) 2 
0- 7 "5 3 
M^ 7 5 4 



(41 755 
01 756 
017 5 7 
0i 760 
01 761 
0i 762 
01 763 
01 764 
01 765 
01 766 
0< 767 
PI" 770 
0i 771 



7 5 4 1 
? 7 5 4 3 
3 7 5 7 ? 
5 7 5 7 2 
9 4 7 5 4 3 
7 4 d ? (J 
7 4 i' 4 
7 4 1. 4 
7 4 4 



7 5 4 01 
207544 
30757? 
50757? 
247544 
740?00 
74t5(?4« 
7 414 00 
740040 
447633 
601 S?4 
10610? 
1061 26 



(■' 3 3 7 



A.: = K1K, L! 
01. A !CMA -rLL 
L A r K 1 -. 
A on K 7 ; 
AND K7', 
X P Kl i' 

HAl T 
R ? 1 
HALT 



(3 38 

/ 

/TEST ADD K7S, AC r K400 

CL'!CM£!C|_L 

LAC K 4 / a 

ADD K75 

A N (1 K 7 S 

X P K 4 

S2* 
F339 HALT 

S2L 
L340 HALT 

IS? W0»K3 
JMP AOOAC 
JMS RFMRAN 
JMS CKfjO 
.EJECT 



,'K : 

/AC = ONES, LINK = ,1 

/AC = 1 K 
/ONES 

/AC = 1K 

/AC = 

/error) ado-ps to k1k failed 

/error; link not a ?ero, carry failed 

INK = 

/AC = ONES, LINK - 

/AC = 400 

/ONES 

/AC = 400 



/AC = f 

/ERROR; 



SDO-0 TO K4 00 FAILED 



/error; link not a zero, carry failed 
/check done looping 

/LOOP 

/GET NO, FOR NEXT LOOP 



iA t; EX9 



PAGE 34 



01772 
Hi 773 

01 774 
01 775 
01 776 
01 777 

0?000 
09001 

0900? 



09003 
0^004 
09 00 5 
09006 
09007 
09010 
0?011 
09012 
09013 



09014 
09015 
09016 
09017 
09090 
09021 
0?022 
09023 
09024 



09025 
09026 
09027 
09030 
09031 
09032 
vl9fl33 
09034 
09035 



09036 
09037 
9 4 
09041 
09042 
0'.043 
•A '044 
9 4 5 
' 4 6 



754001 
2 7 5 4 
307572 
507540 
247540 
740200 
7 4 (? p 4 
741400 
740040 



754001 
207534 
307572 
507572 
247534 
740200 
740040 
741400 
740040 



754001 
207533 
307572 
507572 
247533 
740200 
740040 
741400 
740040 



754001 
207532 
307572 
507572 
247532 
740200 
740^40 
741400 
740040 



754001 
207531 
307579 
507579 

247531 
740900 
7 4 0040 
741 400 
740040 



/TFsr Ann 



I- 34 7 

L34fi 
/ 

/test Ann 



K7P, A*- = K20, LIKK 

C L A ! C M A ! C L L 

LAC" K?-» 

ADO K7S 

AND K9 ; '- 

XOR K pi- - 

SZA 

HAL T 

SZL 

HAl T 



F34 9 

F350 
/ 

/test Ann 



F351 

F352 
/ 

/tfst Ann 



F353 

I- 354 

/ 

/TFST A 00 



K7S 
CLA 
LAC 
AO!) 
AND 
XOR 
SZA 
HAL 
SZL. 
HAL 

K7S 
CLA 
LAC 
ADO 
AND 
XOR 
SZA 
HAL 
SHI 
HAL 



L'NK 



, AC = Klf» 
iCMA tCLI. 
' K 1 ' 

K7S 

K7S 

Kl-', 

T 



, AC - 4, LINK 
[OMA JCLL 

K4 

K7S 

K7S 

K4 



K7S, AC = K2, LINK 

CLA !CMA !CLL 

LAC K2 

ADn K7S 

ANn K7S 

XOR K2 

SZA 

HAi T 

SZI 

HALT 



E355 
F7S56 



K 7 S 
CLA 
LAC 

Ann 

AND 
XOR 
SZA 

HAL 
SHI. 
HAL 

.EJ 



AC = Kl, LINK 
CM* :cll 
Kl 
k/n 
K7S 
HI 



T 
ECT 



= 

/AC = ONES. LINK = 

/AC = 20 

/ONF^ 

/AC = 20 

/AC - 

/fTRRow; Ann -0 to K20 failed 
/error: li n k not a ?fr , carry failed 



/AC = ONES, LINK = 
/AC = 10 
/ONFS 
/AC = 10 

/AC = 

/error; add r to kib failed 
/FRROR! link not A ZFPO CARRY failed 



/AC = ONFS. LINK - 

/AC = 4 
/ONES 

/AC = 4 

/AC - 

/ERROR! ADD -0 TO K4 FAILED 

/ERROR; LINK NOT A ZERO, CARRY FAILED 

= 
/AC = ONFS, LINK = 
/AC = 2 
/ONES 
/AC = 2 

/AC = 

/frror; Ann -0 to k2 failed 

/ERROR! UnK NOT A ZERO. CARRY FAlLEn 



/AC = ONFS. LINK = 
/AC = 1 
/ONES 
/AC r 1 

/AC = 

/ERROR! ADO -0 TO K1 FAILED 

/ERROR! LINK NOT A ZFRO. CARRY FAILED 



■■ A ■, f_ y 9 



<9 PACE 


3 5 


■.): 047 


744000 


cj- 050 


777777 


i* 9 5 1 


507579 


0'- '052 


307*553 


0'063 


947553 


0"054 


740900 


0V055 


740040 


09056 


741400 


905 7 


740040 


09060 


744009 


09061 


777777 


09062 


507579 


09063 


307557 


09064 


947557 


09065 


740900 


9g66 


740040 


09067 


740400 


09070 


740040 


09071 


744009 


0907? 


777777 


09073 


507579 


9 7 4 


307320 


09075 


247320 


09076 


740200 


09 77 


740040 


09100 


740400 


09101 


740040 


09102 


744002 


09103 


777777 


09104 


507572 


09105 


30755? 


09106 


?*755? 


09107 


740200 


091J0 


740040 


09111 


740400 


09112 


740040 


09113 


744002 


09114 


777777 


09115 


507572 


09116 


307556 


09117 


247556 


09190 


740200 


09121 


740040 


09122 


740400 


09123 


740040 



/TEST ADD K4C0K, AC 
CLL 

l.kV. 17777 
A N n K 7 ^ 
A On K4.M0K 
XOW K4M0K 
S2A 

F357 HALT 
«L 

F358 HALT 

/ 

/TFST Ann K2C0K, AC 
CLLiCML 
LAW 17777 
AND K7S 
ADD K?00K 
XOR K200K 
SZA 
HALT 

SNL 
HA| T 



ONFS. LINK = V 

/LINK = 9 
/AC = ONFS 
/AC = ONFS 
/400K 



/AC = 

/ERROR! ADD K400K TO -0 FAILED 

/ERROR; LINK NOT A ZERO, CARRY FAILED 



ONFS, LINK = 1 

/LINK = 1 
/AC r ONES 
/AC = ONFS 
/?00K 



F359 



F360 

/ 

/TEST ADO K100K, AC 
CLL !CMi. 
LAW 17777 
AND K7S 
ADO K100K 
XOR K100K 
S?A 

F361 HALT 
SNL 

F362 HA L T 

/ 

/TFST AOD K40K. AC • 
CLLiCML 
LAW 17777 
AND K7S 
ADO K40K 
XOR K40K 
SZA 

F363 HALT 
SNL 
HALT 



/AC i 

/ERROR! ADD K200K TO -0 FAILED 

/ERROR! LINK NOT A ONE, l'NK RESET 



ONFS, LINK s 1 

/LINK = 1 
/AC = ONES 
/AC = ONES 
/100K 



/AC = 

/ERROR; ADD K100K TO -0 FAILED 

/ERROR! l'nK NOT A ONE , l'N k RESET 



ONES, LINK = 1 

/LINK * 1 
/AC = ONES 
/AC s ONES 
/40K 



/AC - « 

/ERROR; ADD K40K T° -0 FAILED 

/ERROR! LINK NOT A ONE, LINK RESET 



F364 

/ 

/TEST ADO K2(*K, AC = ONES, LINK = 1 

CLLtcML /LINK = 1 

LAW 17777 /AC = ONES 

AND K7S /AC = ONES 

AOD K2MK /20K 

XOR K2HK 

SZA /AC = 

E365 HALT /ERROR; AOD K20K TO - FAILED 

SNL 

F366 HALT /ERROR! LINK NOT A ONE, LINK RESET 
/PDP-9 BASIC EXERCISER - TAPE 3 



■A^FX? 



pAOE 36 



/ T F S I 



051 ?4 
09125 
05126 
09127 
CI 9 13 
555131 
0913? 
09133 
09134 



05135 

0?13 7 
05140 

05141 

05142 
05143 
05144 
05145 



05146 
05147 
05150 
05151 
05J52 
05153 
^5154 
05155 
05156 



05157 
05160 
05161 
05162 
05163 
05164 
05165 
05166 
05167 



05170 
05171 
05172 
05173 
05174 
09175 
05176 
09177 
09200 



744002 
777777 
50757? 
307555 
24755S 
740200 
740040 
740400 
740040 



744002 
777777 
50 7 5 7 ? 
307547 
247547 
740200 
740040 
740400 
740040 



744009 
777777 
507572 
307545 
247545 
740200 
740040 
740400 
740040 



744002 
777777 
50757? 
307543 
247543 
740200 
740040 
740400 
7 4 4 



74400? 
777777 
50757? 
307544 
247544 
740200 
740040 
740400 
740040 



f 367 

(.368 

/ 

/TFST 



F369 

F370 

/ 

/TFST 



Ann Ki0K. .'•(", 
CLL '. cmi 
LAW 17 777 
ANI " ?'■ 
A OF Kl.'K 
XOr Kl'.K 
SH 
HAL T 
SNI 
H*l t 

Ai)H K4K, AC = ONFS, 
CLL !CMI 
• |. 4 K ! 7 7 7 7 
A NO K 7 '. 

Aon k4k 

XOR K4K 

S2A 

HALT 

SNI 

HALT 



F375 
f 376 



= ONFS, L INK = 1 

/LINK = 1 
/AC = ONFS 
/AC s ONFS 
/10K 



/AC = 

/FRROR! ADO Ki0, TO -0 FAILED 

/fRROR; LINK NOT A ONfr , LINK RfS|tT 

LINK - 1 

/LINK = 1 
/AC = ONFS 
/AC i ONFS 
/4K 

/AC = 

/FRRORi ADO K4K TO -0 FAILED 

/ERROR: LINK NOT A ONE. LINK RFSET 



E371 

F372 

/ 

/TFST 



AnO K2K, 
CLL! 
I.AF 
ANtl 
ADD 
XOR 
S?A 
HAL1 
SNI. 
HA 



AC = ONES, LINK 
CHL 
17777 
K7 r * 
K2K 
K2K 



1 
/LINK = 1 
/AC = ONFS 
/AC = ONES 
/2K 



, T 



/AC = 

/ERROR; AC K2K TO -0 FAILED 

/ERROR! LINK NOT A ONE, LINK RESFT 



F373 

F374 

/ 

/TFST 



ADD K1K 
CLL 
LAW 
ANO 
AOO 
XOR 
SHA 
HAL 
SNI 
HA 



, AC = 
•CML 

17777 

K7S 

K1K 

K1K 



ONES, LINK = 1 

/LINK - 1 
/AC = ONES 
/AC : ONES 
/IK 



I.T 



/AC = 

/error! add k1k to -0 failed 
/frror; link not a one. link rfset 



AOO K40 

CL1 
I A,. 
ANI! 
ADD 
XOR 
S2A 
HAl 
SNI. 
HA| 

.EJ 



0, AC = 

iCML 
17 7 7 7 
K7S 
K 4 

K4i*0 



T 
ECT 



ONES, LINK = 1 

/LINK = 1 



ONE S 
ONES 



/AC 
/AC 
/400 

/AC r 

/error; add k400 to -0 eared 
/frror; i Ink not a one, link reset 



x9 PAGF 


37 


»i?20j 


744002 


09202 


777777 


09203 


507579 


H 9 2 4 


307551 


09205 


247551 


09206 


740200 


9 207 


740040 


0921 PI 


740400 


09211 


740040 


09212 


744002 


0921 3 


777777 


05214 


507572 


09215 


307537 


09216 


247537 


09217 


740200 


09220 


740040 


09221 


740400 


09222 


740040 


09223 


744002 


09224 


777777 


09225 


507572 


09226 


307542 


09227 


247542 


09230 


740200 


02231 


74(5040 


09232 


740400 


09233 


740040 


09234 


744002 


09235 


777777 


09236 


507572 


09237 


307540 


09240 


247540 


02241 


740200 


^?242 


74004pi 


09243 


740400 


09244 


740040 


09245 


744002 


02246 


777777 


09247 


507572 


09250 


307534 


02251 


247534 


02252 


740200 


09253 


740040 


09254 


740400 


02255 


740040 



/TEST 



f 3 7 7 



ADD K2i' 
OLL 
LAV. 
ANii 
A on 
XOH 
SZA 
HAL 
SNI 
HAL 



0. AC = 
!CHL 
1 7777 

K 7S 

K200 

K2 f 10 

T 

T 



ONFS, LINK = 1 

/LINK s 1 
/AC = ONFS 
/AC = ONFS 
/200 



I 378 

/ 

/TEST ADO KI00, AC = ONES, LINK = 1 



/AC = 

/FRRORi ADD K200 TO -0 FAILED 

/ERROR! LINK NOT A ONE. LINK ReSfT 



F379 

F380 

/ 

/TEST 



E381 

F382 

/ 

/TFST 



CLl !CMI. 
LAW 17777 
AND K7S 
ADD K100 
XOR K100 
SZA 
HALT 
SNI 
HAL T 

ADD K40, AC = ONES, 
CLLiCML 
LAW 17777 
ANO K7S 
ADO K40 
XOR K40 
SZA 
HALT 
SNL 
HA| T 



F383 

E384 

/ 

/TEST 



F385 
F386 



/LINK = 1 

/AC = ONFS 

/AC = ONES 
/1 00 

/AC = 

/ERROR! ADO K100 TO -0 FAILED 

/FRROR! LINK NOT A ONE, LINK RESET 



LINK r 1 




/LINK 


= 1 


/AC = 


ONFS 


/AC = 


ONFS 


/40 





/AC = 

/ERROR; ADO K40 TO -0 FAILED 

/ERROR! LINK NOT A ONE , l!n* RESET 



ADD K2n, AC 
CLLICML 
LAW 17777 
AND K7S 
ADD K2H 
XOR K2M 
SZA 
HALT 
SNL 



ONES, LINK = 1 



HA L T 



/LINK = 1 

/AC r o N ES 

/AC = ONES 
/20 

/AC = 

/ERROR! ADD K2fl TO -0 FAILED 

/ERROR! l'nK NOT A ONE. L^N* RESET 



ADD Kin 
CLL 
I AW 
AND 
ADD 
XOR 
SZA 
HAL 
SNL 
HAL 
.EJ 



, AC = ONES, LINK = 1 

!CML /LINK = 1 

17777 /AC r ONFS 

K7S /AC 1 ONES 

KIM 

K10 

/AC = 

T /ERROR! ADO Kl0 TO -0 FAILED 



T 
ECT 



/ERROR! LINK NOT A ONE, LINK RESET 



<Asf VP 



PAGE 38 



/TEST 



09256 
2?57 
3 2 2 6 
02961 
02262 
2 26 3 
0>?64 

02265 
02266 



09267 
05270 
02271 
02272 
2 273 
09274 
0^275 
09276 
02277 



09300 
02301 
09302 
2 303 
09304 
02305 
02306 
09307 
0231 



09311 
02312 
02313 
02314 
02315 
09316 
0931 7 
02320 



09321 
02322 
02323 
09324 
09325 
39326 
02327 
02 330 



7 4 4 2 
777777 
507572 
307533 
9 4 7 5 3 3 
740200 
7 4 V- 4 
740400 
740040 



744002 
777777 
507572 
307532 
247532 
740200 
740040 
740400 
740040 



744002 
111111 
507572 
307531 
247531 
740200 
740040 
740400 
740040 



744000 
207572 
307572 
740001 
740200 
740040 
741 400 
740040 



7 4 4 002 
207604 
3 7 6 6 
2 4 7531 
740200 
740040 
740400 
740040 



\ jH7 

\ 3«8 

/ 

/ T F S T 



F3H9 

E390 

/ 

/Tf ST 



AUP K4, *C = ONES, LINK = 1 

CLL!OMl /LINK = 1 

LAW 177 77 /AC = ONFS 

AM- yt< /AC z ONES 

A (111 K 4 /4 

V I, K 4 

S£A /AC = 

HALT /ERROR; AOL K4 TO -0 FAILED 

SNL 

H Al.T /pRROR; LINK NOT A OMf . LINK RfS|tT 

ADD K2, AC - ONES, LINK - 1 

c Ll !fMI /LINK = 1 

• i'aw 17777 /AC = okjFS 

AND K7S /AC 

ado K2 /? 

XOH K? 
S2A 
HAL T 
SNL 
HA|_T 



E391 

F392 

/ 

/TEST 



F393 

E394 

/ 

/TEST 



F3y5 
F396 



ONES 



/AC = 

/ERROR! ADD K2 TO -0 FAILEO 

/ERROR! LINK NOT A ONE, L ' NK RESET 



ADD Kl. AC = ONES, LINK 
CLL!OML 
LAW 17777 
AND K7S 
ADD Kl 
XOP K1 
SHA 
HALT 
SNL 
HALT 



= 1 

/LINK = 1 

/AC = ONFS 

/AC = ONFS 

/I 

/AC = 

/error; add kl to -0 faileo 
/error; link not a one, link reset 



ADD K7S, AC r ONFS, LINK = 

CLL /LINK - 

LAC K7S /AC = ONFS 

ADD K7S /ONES 

CHA /AC - ONES 

S£A /AC = 

HALT /ERROR! ADD K7S TO ALL ONES FAILED 

s?l „ ,- T 

H A( T / F RROR; LINK NOT A ONr • LINK RrSfT 



ADD 525 
CLL 
LAC 
ADD 
XOK 
S2A 
HAL 
SNI 
HA| 
.EJ 



253, AC : 252525, 
!CMl 

K01 
K5 < 
Kl 



T 
ECT 



L INK - 1 
/LINK = 1 
/AC = 252525 
/525253 
/000001 
/AC r 
/FRROR: ADD K5253 TO K5252 FAILED 

/ERROR! LINK NOT A ONE, LINK RESET 



PAGE 







/TEST 


Ann 252525. AC 


51 ■> 3 3 1 


744000 




CLE 


«-. 33 2 


?07606 




LAC K5< 


i* 333 


30 7 60 4 




ADD K0i0 


«'.- 334 


247531 




XOR Kl 


0' 335 


740200 




S?A 


0-336 


740040 


F397 


HALT 


0V337 


741 400 




S2I 


0' 340 


740040 


F398 

/ 

/TEST 


HAl T 






ADD SERIES 


02341 


754000 




CLA !CLI 


0>342 


307564 




ADO K1.S 


M>343 


307565 




ADD KgS 


51 '■ .3 4 4 


307566 




ADO K3S- 


0:345 


307567 




Aon k^is 


0'. 346 


307570 




ADD K5S 


0'<347 


307571 




ADD K6S 


M'-350 


307">72 




ADD K7S 


^351 


740001 




CMA 


:V. 352 


740200 




S?A 


0V353 


74 4 


E399 


HALT 


0- 354 


740400 




SNL 


0- 355 


740040 


F"400 


HALT 


'■^356 


447633 




TS? WORK3 


0"35 7 


60177? 




JMP ADnACl 


0'>360 


106102 




JMS gEmran 


0?36l 


106126 




JMS CKNO 
.EJECT 



525253, LINK RESET 



/LINK = 

/AC r 525253 

/252525 

/000001 

/AC = 

/ERROR; ADD K2525 TO K5253 EAILED 

/ERROR; LINK NOT A 2ERO, CARRY FAILED 



= 



/LINK 


- 0, AC 


/AC = 


111111 


/AC = 


333333 


/AC = 


666666 


/AC = 


333333. 


/AC = 


111111 


/AC = 


mm 


/AC = 


mm 


/AC - 






LINK 



/ERROR; ADD SERIES FAILED 

/ERROR! LINK NOT A 1 
/CHECK DONE LOOPING 

/LOOP 
/GET NO. FOR NEXT LOOP 



-rvt 



page 



.. 


'36? 


1 06 1 ,<.' 


0' 


^63 


7 4-1 10 





364 


7 4.' 1 


•:>' 


565 


;il ?;,./ 


,1 


36 6 


6 ? 3 6 ? 


,1 


56? 


'* 4 3 1 6 





3 7 


7 4^ 1 


0' 


37 1 


3 4 301 ' 


a 


37? 


10 610? 





<3 7 3 


7 4 H 00 


ft 


371 


740001 





375 


741 ?00 





376 


60237? 





377 


043C'?f 


'.1 


400 


7 4f)00l 





-401 


0430?1 





40? 


777777 





403 


0430?7 





. 4 4 


7 4 4 





4 5 


? 3 (" ? 1 


■/■, 


406 


3 4 3 1 7 


••a 


-407 


7 4 1 4 3 


(1 


04 10 


3475 31 





"4 1 1 


4 3 0?? 


51 


P4 1 ? 


? 3 1 6 





4 1 3 


744000 





?41 4 


343^?0 


0941 5 


741400 





?4 1 6 


347531 


3 


741 7 


043«!?3 



/ SI i RAMiTOH PA ] I 
/ 



[PP'-.A 



U '- T 



f i MJ'-R 



«I^SsR 



i 1 ■■ 


9 r, in 


r m / 




iiai: 




J MS 


St PA 


r M .'• 




S N* 




JHP 


Ml US 


hat 


H P S 


CM A 




n A r 


BNfG 


I. Aw 


-1 


ll Ai- 


PASS? 


nu 





TAs 
FlAf 



'NFG 



/MPk GF'JFRATf A * P 

LAC AP0S 
DLL 

TAP RPOS 
S?l 

TAP Kl 

API USB HAP SIMPOS 
.EJECT 



/GET RAMIO" 0U w BFR 

/ ♦ N 

/ _ H A K F IT 4 

/ -■• NOT AFLOWFO 

/IT IS + A 

/ 1 C M P I. i « V '<: 1 

/IT IS -A 

/GET NEXT :-'A''J0OM 
/+ NO 
/ - H**( + 
/? NOt ALlOwFD 

/IT IS + H 
/MAKE 1 «S COHP 
/IT IS - P 



/ p ESTA HT HFPF TO REGENERATE NEW COMPARES 

/-R -A 

/FOP IF Ann 

/YFS MAKF CARRY 

/SAyE -A -P 



/GET + A 

/ + B 

/FOC IF ADO 

/YES ADO CARRY 
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0' 4 20 


203020 


M?4?l 


744000 


094 22 


343017 


09423 


741 400 


09424 


347531 


09425 


0430?4 


09426 


2 03 016 


09427 


744000 


09430 


343021 


09431 


741400 


09432 


347531 


05433 


043025 



05434 


203023 


09 435 


751100 


0-436 


207653 


09437 


741200 


09440 


207652 


9 441 


042464 


09442 


042512 


09443 


042627 


09 444 


042644 


H5445 


042662 


09446 


042701 


02447 


042721 


09450 


042742 


02451 


042764 


05452 


042540 


05453 


042566 



/NOW GFNERATF 


R-ft 


I.AC 


BP'iS 


CLL 




TaO 


ANFG 


SZL 




TAO 


Kl 


RMINSA DAC 


BMASUH 


/ 

/NOW GFNERATF 


A-P 


I.AC 


APOS 


CLL 




TAD 


BNFG 


SZL 




TAD 


Kl 


AMINSB DAC 


AMRSUM 



/GET 8 



/B-A 
/EOC 
/YES 



ADD CARRY 



/SAVE R-A 



/GET A 



/-B 
/EOC 
/YES 
/A-B 



ADD CARRY 



/ 

/IF A+B IS AN OVFRFLOW SITUATION 

/MAKF OFLOW TESTS THAT APPLY : SNL 

/IF A+B IS NOT OVERFLOW MAKE 

/OVFRFLOW TEST THAT APPLY = SZL 

/ 

LAC SUMPOS 

SPA!CLA 

LAC KSNL 

SNA 

LAC KS?L 

DAC OFLCK1 

nAC 0FL.CK3 

OAC OFLCH1 

OAC OFLCH2 

DAC 0FLCH3 

DAC 0FLCH4 

DAC 0FLCH5 

DAC OFLCH6 

DAC 0FLCH7 

OAC 0FLCK5 

OAC OFI.CK7 

.EJECT 



/GET A+B 
/STILL POS RESULT 

/neg result is overflow 

/ac - snl is overflow 

/+ result is no overflow 

/set up all oflow 
/tests where oflow 
/may or may not occur 
/ac = snl is a*b oflow 
/ac x s2l is a+b not oflow 
/if a+b oflow -a-b ooes also 
/if a+b not oflow 
/then none of these 
/adds can overflow 



> A - r y 9 
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: COMPI FTP SERIES OF 
•iP AFOITIONS 
;,FT ThF 'AME RESULTS AS 
'S i-J 1 T H - OC TAD ( 1. 







/ F i P s T 


T <• S T A • 


tH 


,:4<54 


744;/,, p. 


API S-T 


CLI 




0',455 


2 T •/ 1 ft 




LAC 


M> S 


«V'4 , 56 


3 3 2 




A Oli 


PP S 


0--457 


543023 




SAO 


SU 'POS 


0' 460 


602464 




J M P 


+ i 


07461 


7 4 5) P? 4 


f 4„-,l 


HLT 




11' 462 


203023 




• L AC 


SU'-'POS 


" 4 6 3 


7 400 40 




HLT 




v 4 6 4 


741400 


OFLCKi 


SZL 




«2465 


74pi040 


i: 4i/j2 


HLT 




02466 


762454 




LAV. 


APl.SBT 








.EJECT 



/rn 
/cf 

/A + 
/SH 
/OK 

/Dl 

/r,F 

/HI 
/OR 
/LI 



R OVEPH Ow CHECK 

T A 

a 

OI1LD = PPFVIOUS A*P 

SPLAY 1 'S A + 8 
T ?'S COMP r,EN 
SPLAy ?'S A+8 

SNI. IE OVERFLOW 
MK OR OVERFLOW FAILED 

/MAKE JUMP FOR SCOPE LOOP 



-) 


v a r, f 


43 


.< 


467 


7 4 4 V, 


-1 


470 


503021 




', 4 7 I 


30 3.-'- 1. h 




472 


5 4 3/55 


,;., 


4 7 '5 


A 9 4 7 7 





474 


74 0040 


:h 


475 


903025 





476 


7 4 4 


?, 


'.' 4 7 7 


741 400 


•A 


. 500 


740040 




: - 5 \ 


762467 


0: 


50? 


744000 


<A: 


■503 


50 3017 


?,: 


504 


303071 


0' 


505 


5430?? 


n: 


506 


60751? 


C<T 


507 


74004p 


0'. 


= 510 


5030?? 


0; 


; 511 


7 4 040 


a- 


J 51 2 


7 414 


'/■' 


-513 


7 4 00 4 


w- 


'51 4 


762502 



'■'515 
5 516 
551 7 
II: s?0 
5 5 ? 1 

.<. 5?2 
0'.'5?3 
v. 5 ? 4 
05575 
5576 

>5 5?7 



7 4 4 p» a 
703020 
30 301.7 
543054 
602525 
740(M0 
20 30 5 4 
740040 
741400 
740040 
762515 



/?r.n lf< 


T -R + , 


i 


.'. MKS-iT 


r'L 1 






i ' r 


RNf G 




A 01 


AP S 




SAh 


A*hSUM 




.IMP 


, + 


f 4 03 


HLT 






1 AC 


AM- SUM 




HLT 




nri.c*? 


S?l 




F 4 4 


HLT 






1 »» 


AM'iSF<T 


/ 






/ N W 3 R n 


TFST 


IS -A -B 


MAPL'-tB 


CLI 






I.AC 


A Nil G 




ADD 


RNFG 




SAO 


SUMNFG 




J MP 


. +4 


F405 


HLT 






1 AC 


SUMNEG 




HLT 




0FLCK3 


S2L 




F 4 6 


HLT 






1 AN 


MAPLM8 


/ 






/FOURTH 


TFST : 


IN THIS SFRIES 


/IS TFST 


H-A 




R M N S A T 


CLI 






1 Ac 


BpriS 




a on 


ANFG 




SAL 


RMASUM 




J MP 


. +4 




HLT 






LAp 


BM»SUM 




HLT 






S2L 






HLT 






1 Ak 


RMnjSaT 




.EJECT 



/GET A 

/A-R 

/SHOULR - PREVIOUS A-B 

/OK 

/DISPLAY l'S A-B 

/DISPLAY ?'S A-R 
/SHOULD NOT OVERFLOW 



/MAKE JMP FOR SCOPF 



/GET -A 

/PLS -R 

/SHOULD = PREVIOUS -A-H 

/OK 

/DISPLAY 1 'S -A-B 

/DISPLAY 2'S "A-B 

/OR SNL 

/I INK FAILED 

/MAKF JMP FOR SCOPE 



/GET P 

/ADD -A 

/SHOULD = PREVIOUS B-A 

/OK 

/DISPLAY l'S B-A 

/DISPLAY ?'S B-A 
/CAN NOT OVERFLOW 
/OVFRFLOW FAILED 

/MAKE JMP FOR SCOPF 



■iASEV? 
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/FIFTH TEST IN THIS SERIFS 
/IS TEST (A+BJ-A = B 



09530 


7 4 4 00 


07531 


203093 


09532 


303017 


07533 


5 4 30 90 


09534 


602540 


07535 


740040 


09536 


203020 


09537 


740040 


09540 


741400 


09541 


7 4 0040 


09542 


762530 



ARMATS 



F40 7 



0FLCK5 
F408 



CLl 

LAC 
ADD 
SAD 
JMP 
MLT 
LAC 
HLT 
S'iL 
HLT 
I AW 



SUi-POS 

ANFG 
PROS 

. +4 

BPOS 



A B M A T S 



/CAN OVERFLOW SNL IF A+B OVERFLOW 
/ILLFGAL LINK 

/MAkT JMP FOR SCOPE 



09543 


744000 


09544 


203024 


09545 


303021 


09546 


543017 


09547 


602553 


09550 


740040 


09551 


203017 


09552 


740040 


02553 


741400 


09554 


740040 


09555 


762543 



/sixth test 
/is test <r- 



in ThIS 
A)-B = 



SERIES 
-A 



RMAMHT 



E409 



0FLCK6 
E410 



CLL 
LAC 
ADO 
SAO 
JMP 
HLT 
LAC 
HLT 
SZL 
HLT 
LAW 



BMlSUM 
RNFG 
ANFG 
. +4 

ANFG 



RM4MBT 



/CAN NOT OVERFLOW 



/MAKE JMP FOR SCOPE 



07556 
09557 
09560 
07561 
09562 
07563 
07564 
09565 
07566 
09567 
09570 



744000 
203027 
303016 
543021 
602566 
740040 
203021 
740040 
741400 
740040 
762556 



/SEVENTH TEST IN THIS SERIFS 
/IS <-A-B)+A s -R 



MABPAT 



E411 



OELCK7 
E412 



CLL 
LAC 
ADO 
SAD 
JMP 
HLT 
LAC 
HLT 
SZL 
HLT 
LAW 



SUMNEG 
APOS 
BNFG 
. +4 

BNFG 



MARPAT 



/CAN BE OVERFLOW IF A + B OVERFLOW THEN IS SNL 
/ILLEGAL LINK 

/MAKE JMP FOR SCOPE 



.EJECT 
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/ F 1 G 4 T H T F S T 1 


:)F THF SFRIFS 






/p. ( A-", ) ♦ « 


= A 


' 5 71 


7 4 4 i ,■■ 


»mhpwt n.i 




' r >7? 


? 3 7 5 


i '-(■ 


AM. .SUM 


' 573 


3 ■ 3 f* " £■' 


iUli 


fip S 


0-, 5 74 


5 4 30 ■■ i 


SAL 


APS 


ii- 5 7 5 


6 ? * P1 1 


JM( 


. + i 


0' 5 76 


7 4 4 t' 


! 41 J HLT 




0- 5 77 


?H 3f 1 < 


1 AC 


APfiS 


0- 600 


7 4 0040 


"LI 




'.-■ 6 1 


7 4 1 4 


1 '■ F L C < R S ? 1 




fi 6 0? 


7 4 V 4 


F 4 1 4 WL1 




; 6 3 


76?'-7l 


1 AW 


AM>-PRT 






/9TH KST OF : 


SERIES 






/ N n W T F S T AC 
/ 

" a c i' a r: L t 


= 777777 + A 


ir 6 04 


7540^1 


! FLA !CMi 


J:. 605 


3 3 1 6 


A Di i 


APliS 


0-- 606 


5 41016 


SAL 


APMS 


• ■ 6 7 


6 7 613 


J M P 


. + A 


•; 6 1 


740040 


F415 HLT 




f -61 1 


2 3016 


LAC 


APOS 


(1 -,612 


7 4 040 


HLT 




•> 6 1 .3 


7 4 14 


(.r L r.-Q s?i. 




5-614 


7 4 00 40 


f 416 HLT 




»>615 


7 6 ? 6 4 


1 kVi 


M0ACPA 






.FJFCT 



/CAN NOT OVERFLOW 

/MAKF JHP FOR SCOPF 



/set ac = mm 

/* A 

/SHO(jLF) = A 
/TEST L INK 
/FAILED RESULTS 

/DISPLAY A 
/CANNOT OVERFLOW 
/OVERFLOW FAILED L - 1 

/MAKE JMP FOR SCOPF 



(A-FV9 



PAGE 



096.1? 
09633 
0'634 
09635 
09636 
09637 
09640 
07641 
09642 
09643 
09644 
09645 
09646 



754001 
30301.6 
303020 
303017 
303017 
543094 
602644 
740040 
203024 
740040 
740400 
740040 
762639 



/THE NFXT SERIFS OF TESTS 

/ARE ADD SFQiiFMCi-S THE RESULTS 

/ d f ,hich h a v f a i r f a y re en 
/computer anil. vf< if ifd 
/ 

/FIRST SfRIES TESTS A+R 
/SFF ARMaTS FOR SHORTER 
/MOW TRY A + B-A i R 



OK, THFM (A+R)-A = B 
TEST OR APLSHT OR M0ACPA 



09 6 1 6 


754001 


SERSll 


CLE! 


!CLa !CM4 


09617 


303016 




add 


A P ■ '. S 


09690 


303020 




ADD 


HpO S 


09621 


303017 




aom 


A N F G 


09622 


543020 




SAD 


RPOS 


09623 


602627 




JMP 


. + 4 


09624 


740040 


F417 


HLT 




09625 


703020 




LAC 


BP.'iS 


09626 


740040 




MET 




09627 


741 400 


OFLCHl 


SZL 




0'- 630 


7 4 40 


F418 


HLT 




09631 


762616 




LAW 


SF(?S01 



/or snl if a+8 overflow 
/link failure 

/mak? jm p for scopf 



/ 

/HAVF TESTED B-A PREVIOUS 
/SEE BMNSAT FOR SHORTER TEST 
/NOW TRY A+B-A-A = B-A 



SERS-12 



CLL!CLA!CMA 





ADO 


APns 




ADO 


RPOS 




ADC 


ANFG 




ADD 


ANFG 




SAO 


RMASUM 




JMP 


. + 1 


E419 


HLT 






LAC 


RMASUM 




HLT 




OFLCH2 


SNI 




F420 


HLT 






LAW 


SERS02 




.EJECT 



/OR S?L IF NO OVERFLOW 

/MAKF JMP FOR SCOPE 



< A F V o 



rage 



•a- fay 
&■■ 650 

:.<I?651 

0"-652 
0"-653 
0: 65 4 
Pi " 6 5 5 
'■<!•■ 656 
« ' 6 5 7 
PI : 6 6 PI 
02661 

'• 6 6 2 
^'-663 

01 664 



"''665 
0V666 
H- 667 
PI '- 6 7 PS 
02671 
0:>672 
0'-673 
3.674 
H',675 
0'676 
0'. 677 
0'. 700 
09701 

0'703 



754HC11 

30 301 /s 
3031171* 

30 301 7 
30301.7 
303021 
5 4 3 1 7 
602662 
7 4 H 4 tf 
20301 7 
743Ci40 
741 400 
7401M0 
762647 



754001 
303016 
303020 
303017 
303017 
30 30 21 
30 30 21 
543022 
602701 
740040 
20 30 22 
740040 
741400 
74fl04f, 
762665 



/ H A V 
/SFE 
/ N W 
SE'-S 



' TESTED (R-A)-B = 
RM4MBT FOK SHORTER 
TkV a+s-a-A-R = -A 



■A PREVIOUS 
TEST 



3 



I- 421 



OFI.C 
F422 

/ 

/HaV 
/SFE 
SERS 



H3 



CLI 

A Oil 

Ann 
Ann 
aoo 

ADD 

SAP 
.IMP 
HLT 
LAC 
HLT 
SZl 
HLT 
LAW 



!CL '■ !CMA 
Ap.'-S 
HP'S 
AMI- G 
ANFG 
RNf G 
A N F G 



t>NL G 



SERS03 



/SNL IF A+B OVERFLOW 
/OVERFLOW FAILED 

/MAKE JMP FOR SCOPE 



F TEST -A-R 
MAPLMR FOR 



MOW TRY 
SHORTER 



A+R-A 
TEST 



-A-B-R 



-A-B 



4 



F423 



OFLC 
F424 



H4 



CLL! 

A on 

ADO 
ADO 
AOO 
ADD 
ADO 
SAD 
JMP 
HLT 
LAC 
HLT 
SZL 
HLT 
LAW 



CLA !CMA 

apos 
epns 

ANFG 
ANFG 
RNFG 
RNFG 
SU^NEG 



SUMNEG 



SERS04 



/SNL IF A+B OVERFLOW 

/OVERFLOW FAILED OR LINK FAILED 

/MAkE JMP EqR SCOPE LOOP 



.EJECT 



fA^FV9 
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/HAvF TESTED (-A-R)tA = -R NOW A + R-A- A-R-R+ A 
/USE MARPAT FOR SHORTER TEST 



09704 


754001 


SERS.^5 


CLL ! 


!CLA !CMA 


0-.'705 


30301* 




ADD 


AP-iS 


09706 


303020 




A on 


RPOS 


39707 


303017 




ADD 


ANFG 


9 7 1 


303017 




ADD 


ANFG 


09711 


303021 




A on 


BNFG 


09712 


303021 




ADO 


BNF G 


09713 


303016 




ADO 


APHS 


09714 


543021 




SAI1 


BNFG 


09715 


602721 




JMP 


. ■*■ ** 


09716 


740040 


F425 


HLT 




0971 7 


203021 




LAC 


RNFG 


09790 


740040 




HLT 




09721 


740400 


OFLCH5 


SNL 




09722 


740040 


F426 


HLT 




09723 


762704 




LAW 


SE«S05 



/OR SZL IF A + B 00 NOT OVERFLOW 
/LINK OR OVERFLOW FAILED 

/MAKE JMP FOR SCOPE 



/ 

/HAVF OONE -R + A PREVIOUSLY 
/NOW DO A+B-A-A-R-B+A+A = -P + A 
/USE AMNSRT FOR SHORTER TEST 



09724 


754001 


SERSM6 


CLI ! 


!CLa !CMA 


09725 


303016 




AOO 


APOS 


09726 


303020 




ADD 


BPOS 


09727 


303017 




ADO 


ANFG 


09730 


303017 




AOO 


ANFG 


09731 


303021 




AOO 


RNFG 


09732 


303021 




ADO 


RNFG 


09733 


303016 




AOO 


APOS 


09734 


303016 




ADD 


APOS 


09735 


543025 




SAO 


AMRSUM 


09736 


602742 




JMP 


. +4 


0^737 


740040 


F427 


HLT 




09740 


203025 




LAC 


AMRSUM 


09741 


740040 




HLT 




09742 


741400 


0FLCH6 


SZL 




09743 


74004fi 


E428 


HLT 




09744 


762724 




LAW 


SE^S06 








.EJECT 



/OR SNL IF A+B OVERFLOW 
/OVERFLOW OR LINK FAILED 

/MAKE JMP FOR SCOPE 



P A r, F 4 



a 



0- 7 "5 
•V'746 
I*-- 74 7 
0'-750 
a-; 751 
Civ- 75 2 
PI ''753 
0v754 
05755 
756 
0>'757 
0'-760 
09761 
02762 
0' 763 
0'-764 
05765 
05766 



0' 7 ft 7 
05770 
09771 
0;77? 
09773 
(IV 7 74 
05 775 
5 7 7 6 
05777 
«1000 
3001 
0^002 
>13003 
0T004 
0-«005 
0"<006 

0'007 
0301 



754001 
3030 1 6 
303090 
30301 7 
30301 7 
30 30 21 
30 30 21 
30301 6 
30301 6 
303020 
54 301 6 
602764 
740040 
203016 
740040 
740400 
740040 
762745 



443^2 7 
60301 1 
203016 
4 30 20 
203021 
4 3 1 7 
740001 
4 3016 
203020 
7 4 01 
4 3021 
20 30 24 
040010 
203025 
043024 
200010 
H43n25 
602454 



/HA 

/\l(i 
/US 
Sf I- 



VF DO? E (-B+A1+R PREVIOUSLY 
W OOF A+B-A-A~B-B+AtA*B = A 
F A«RPRT FOR SHORTER FST 



S^7 



F499 



OFL 

F43 

/ 

/AF 

/MA 

/AN 

/ 

CON 



CH7 




H L I • C I .1 ! C M A 

Ann ap >s 
ado rp is 
Ann anfg 

a on ANFG 

Ann bnfg 

ADO BNFG 

Aon AP^s 
Aon apis 
AOD ppus 

SAO AROS 

JMP . + .1 

HLT 

LAC APOS 

HLT 

SNl 

HLT 

I AW SE»SB7 



TFR ONE PASS 

KF ALL R CONSTANTS A 

D MAKE ALt A CONSTANTS R 

CHG 



IS? 


PASS2 


JMP 


CKl.P 


LAC 


APOS 


OAC 


RPOS 


LAC 


RNFG 


OAC 


ANFG 


CMA 




OAC 


Apns 


LAC 


BROS 


CMA 




OAC 


RNFG 


LAC 


RMASUM 


UAC 


10 


LAC 


AMRSuM 


OAC 


RMASUM 


LAC 


10 


nAC 


AMHSUM 


JMP 


API SRT 


.EJECT 



/OR S?L IF A+8 NOT OVERFLOW 
/LINK OR OVERFLOW FAILED 

/MAKE" JMP FqR SCOPE LOOP 



/2N0 PASS 

/YES nONF 2ND 

/A 

/IS NOW B 

/RNEG 

/IS ANFG 



/R IS A 

/ANEG 
/IS NEG 



/R-A 



/A-B 

/IS NOW A-R 

/IS NOW A-R 
/OVERFLOW SERUP 



-i A ^ F * 9 



PACE 50 



03011 
0-<01 2 
03013 


44 7ft 33 
60236? 
1061 0? 


r-KLP 




IS>? 

JMP 


WO' 
RA 
GF3 


■-K3 

•Ann 

'RAN 


3 1 4 
33015 


1061 26 
603P3P 


/ 




JMS 
JMP 


r, K • 
Aomos 


1 


0301 6 


000000 


/ 

APOS 











/A 


03017 


0001*00 


ANh G 











/-A 


03020 


000000 


I'POS 











/B 


03021 
030?2 


000000 
000000 


UN KG 

SUMNF G 









/-R 

/-A + ( -P ) 


03023 


000000 


S U M P (1 S 









/A + R 


0^024 
030?5 


000000 
000000 


RMASt 
AMRSl. 
/ 
MSKB 


IM 
IM 










/B+(-A> 
/A+(-R) 


03026 


000000 


IT 












/CHFCK nONF LOOPING 
/LOOP 
/GFT NO. FOR NFXT LOOP 



.EJECT 



<A FV9 PAGF 61 

vi<0?7 000000 



x 3 


1061 0? 


0x031 


043016 


0X032 


740001 


<033 


043017 


x 3 4 


207653 


0x035 


043026 


0X03 6 


203016 


0X037 


503026 


X 4 


74020H 


3 041 


603050 


0X042 


203016 


0X043 


243026 


0X044 


043020 


Ji.<0 4<5 


203017 


0X046 


043«21 


0-047 


603056 


1X05 


203017 


0X051 


243026 


0X06? 


043020 


0X05 3 


20 3 016 


0X054 


043021 



'"ASS 

/Gf.T A RANDOM NU <RFR AND ITS l'S COMPLEMENT 

/EACH RIT WILL H VF A IN ONE OF THF TWO NUM8FRS 

/MAKE THF n HIT = 1 AND ADO THF NUMBERS BOTH WAYS 

/FIRST Alio IS THF (AC) IS THE ALTEPFD = 1 

/SFCONO ADO IS ThE (MB) IS THE ALTERFD 0=1 

/THE RESULT OF BOTH ADOS SHOULD = THE ALTERED BIT = 1 

/ 

ADFOON JKS GE'JRAN /GET RANDOM NUMBER 

DAC AP' S /SAVF IT 

CM,, /MAKE ONES COMPLEMENT 

DAC ANFG /AND SAVE IT 

/ 
/THE FIRST RIT TO fiE ALTERED IS THEN CONTINUF TO 17 

| . A (' K 4 K 

DAC MSKRIT 
/ 

/SET UP NEXT BIT TO TEST 
BISETU LAO APOS 

AND MSKBIT 

SZA 

JMP MO'InFG 

LAC APOS 

XOR MSKBIT 

DAC RPOS 

LAC ANFG 

OA-C BmFg 

JMP BlTTSl 
/ 

/THE ONES COMP NUMBER HAS THE BIT MODIFY IT 
MOnNEG LAC ANFG 

XOR MSKBIT 

DAC BPOS 

LAC APOS 

DAC RNFG 
/ 

/COMPLFMFNTEO BIT TEST1 (AC) 
/ 



ALTERED NUMBER GOES TO bPOS 



/DOES APOS BIT = 

/NO ALTER AnFG 



/MODIFIED NUMBER GOES TO APOS 
/UNMOD NUMBER GOES TO «nEG 



/mod number to bpos 
/unmod number to bneg 
modified number at add 



0"'"05'5 


744000 


BlTTSl 


CLL 




0X056 


203020 




LAC 


BPOS 


<067 


303021 




ADD 


RNFG 


0x060 


543026 




SAD 


MSKBIT 


0X061 


603066 




.IMP 


. +4 


0X062 


7 4 00 40 


F431 


HLT 




0X06 3 


203026 




LAC 


MSKBIT 


0X064 


7 4 00 4 




HLT 




0"' 065 


74 1 4 00 


0FLC><8 


SZI 




0X066 


740040 


F43 2 


HLT 




0X067 


76X056 




LAW 


RITTSl 








.EJECT 



/GET MOOIFIEO NUMBER 
/ADO UNMODIFIED 

/RFSULT SHOULD = BIT CHANGED 

/DISPLAY INCORRECT RESULTS 

/DISPLAY BIT ALTERED AND EXP 
/NO OVERFLOW 
/OVFRFLOW NOT ALLOWED 

/MAKE JMP FOR SCOPE LOOP 



•i-rv) 



p a t; f "i ? 



, IT TEST ? <MR> = HOiiiFIFn NUMUFR AT ADO 



" 7 


7 4 4 -0 V 


.< T T T ' : y 


Ctl. 




' 7 t 


? 7 5 1 




i AC 


S ^C 


< 7 2 


307020 




son 


HP'S 


7 7 3 


■543026 




SAI 


m S ' ■ t> I T 


! 0?4 


61*31 00 




J HP' 


, + : 


0*075 


7 4 4 


: 473 


Ml-T 




0307 6 


20 3026 




LAC 


M <; '< R i T 


013077 


7 4 4 




HL1 




710 


74 14 00 


nn.ci j 9 


S2I 




03101 


7 4 4 H 


F 4 3 4 


HU 




07102 


763070 




L A X 


P I T T S 2 



0M03 


203026 


310 4 


744020 


07105 


043026 


3106 


740200 


3 10 7 


60 30 36 



03110 
03111 
07112 
07113 
03114 
07 115 

07116 
0311 7 



447633 
603030 
106102 
1061 26 
750004 
742010 
741100 
602362 



/GFT UNMOOIFIFO Mi'i~rF 

/*nn modified 

/cfSHLT SHOULD = BIT CHANGED 

/nK 

/niSPLAY iNCORPpOT RESULTS 

/DISPLAY BIT ALTFPEO AND f«P 
/SHOULD NOT OVERFLOW 



/POSITION MASK "tiT OVER 1 PLACE 
/IF 17 HAS 8FEN DONE CONTIMUE 

/ 

LAC HSKP.IT 

RCP 

DAT, M s K 8 I T 

S?A 

JMP RISETU 
/ 

/END OF TEST SFQLFNCF 
/ 

IS? W0PK3 

JMP ADFQON 

JMS GENRAN 

JMS CKNO 

LAS 

RTL 

SPA 

JMP RAUADD 
/PDP-9 RASIC EXERCISER - TAPE 4 
/TEST SAD 
/ 



/MAKE JM D FOR SCOPE LOOP 



/GET LAST 
/POSITION 

/SAVE 
/DONE ALL PITS 

/RO FOR NEXT BIT 



/CHECK DONE LOOPING 
/LOOP 
/GFT NO. FOR NEXT LOOP 

/CHECK FOR CONTINUOUS LOOP 
/CK ACS 2 

/LOOP 



07120 
03121 

03122 
03123 


207">3^ 
547530 

741000 
740040 


SADAC 

F4 35 
/ 

E4 36 
/ 


LAC K0 
SAO K0 
SKP 
HALT 


03l?4 
03125 
07126 


20753s* 
547572 
740040 


LAC Kpi 
SAf! K7S 
HAL T 


0312 7 
07130 
3 131 


20757? 
547530 
740040 


F4 77 
/ 


LAC K 7 S 
SAP K0 
HALT 


07132 
03133 


207572 
547572 


LAC K7S 

SAP K 7 S 


03134 

03135 


741000 
740040 


E438 

/ 

/SAD, 


SKP 
HALT 






TAD 



/AC = 

/ERROR. SAO K0 SKIPPFO 

/AC = 

/ERROR. SAO K7S FAlLFD TO SKIP 

/AC - 1 'S 

/ERROR. SAO K0 FAILEO TO SKIP 

/AC = 1 *S 

/FRROR. SAO K7S SKIPPED 



FV9 



P A fi F 



'''M3 6 


75 PI v, ^ pi 




CI A 


3 137 


34753^ 




T A 1 > K v* 


t' < 1 4 


547530 




s ad k 


'V< 1 4 1 


741000 




SKP 


■' :< 1 4 ? 


7 4 1/- 4 


F 4 59 
/ 


HAL T 


03143 


750000 


CLA 


PI 7 1 4 4 


347530 




TAP. K0 


p:<145 


54757? 




SAI1 K7S 


P •< 1 4 6 


740040 


f 440 
/ 


HALT 


0M47 


750000 


CLA 


0M50 


34757? 




TAP K7S 


03151 


547530 




SATi K0 


M3152 


740040 


f 441 
/ 


HALT 


oi -^ 1 6 3 


7^0000 


CLA 


03 154 


34757? 




TA[1 K7S 


03155 


54757? 




SAD K7S 


03156 


741.000 




SKP 


'< 1 5 7 


740040 


F44? 
/ 


HALT 



/AC = !' 

/FRROR. SAn K0 SKIPPFD 
/AC = 

/ERROR. SAD K7S FAlLFO TO SKIP 
/AC = 

/ERROR. SAO K0 FAILED TO SKIP 
/AC = 

/ERROR. SAD K7S SKIPPED 



.FJECT 



<A--Ey 
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/SKQUFNTIAL 
/ 



SAD 



0*160 
0M61 
0*162 
0*163 
0*164 
0*165 
0*166 
0*167 
0*170 
0*171 
0*172 
0*173 
0*174 
0*175 
0*i76 



0*177 
0*200 
0*201 
0*202 
0*203 
0*204 
0,<20 5 
0*206 
0*207 
0*210 
0*211 
0*212 
0*213 
0*214 
0*215 



0*216 
0*217 
0*220 
0*221 



207">30 
54757? 
760001 
54757? 
76000? 
54757? 
760004 
54757? 
760010 
54757? 
760020 
54757? 
760040 
740200 
740040 



750000 
54757? 
760001 
741000 
76000? 
54757? 
760004 
741000 
760010 
54757? 
760020 
741000 
760040 
740200 
740040 



447633 
603120 
10610? 
1061 ?6 



LAC 
SAO 
LAW 
SAli 
LAw 
SAO 
I. A W 
SAO 
L A W 
SAO 
LAW 
SAD 
I Aw 
SZA 
HALT 



K0 

K7 C ' 

1 

K7S 

? 

k 7=; 

4 

K7S 

10 

K7S 

2 

K7S 

40 



t 4 4 3 

/ 

/TEST SAD, SKP SFRIES 

/ 

CLA 

SAli K7s 
LAN 1 
SKP 
LAW ? 
SAD K7S 
LAW 4 
SKP 

LAW 10 
SAL; K7S 
LAW 20 
SKP 

LAW 40 
S2A 

F444 HALT 



IS? WORK3 

JMP SAnAC 

JMS GENRAN 

JMS CKMO 



/AC = 

/760001 

/76000? 

/7600B4 

/760010 

/760020 

/760040 

/ERROR. AC NT 0. CONTENTS OF 
/AC : LAST SAD THAT FAILED 

/AC i 

/760001 

/76000? 

/760004 

/760010 

/7600?0 

/760040 

/FRROR. AC NOT 0. CONTSNTS 
/OF 4C = LAST SAD OR SKP 

/CHECK DONE LOOPING 

/LOOP 

/GET NO. FOR NExT LOOP 



.EJECT 



. 4 ■ F * 9 



'ACE 







/TEST t v 


0<222 


2 7*47 


/ 

n z m a 


1. AC KHALT 


0'<-?23 


1511 11 




n z - 11111 


C ■"* 2 ? 4 


21 11 11 




LAP 11111 


0^225 


7 4 2 




Si!" 


0:<226 


7 4 00 4 


F445 


HAI T 


«."<?? 7 


207647 


/ 


LAC KHALT 


0*230 


152222 




n?M 12222 


P< ^ ? 3 1 


21 2222 




LAO 12222 


0*232 


740200 




SZA 


0*233 


740040 


F446 


HAL J 


03234 


207*47 


/ 


I AC KHALT 


0*235 


153333 




nZM 13333 


0*236 


213333 




LAC 13333 


'1*237 


740200 




SZ* 


4*?40 


740040 


F 4 4 7 


HALT 


Vi "^ 2 4 1 


207647 


/ 


LAC KHALT 


0*242 


1 54444 




nZM 14444 


0*243 


21 4444 




t.AC 14444 


a * 2 4 4 


740200 




sz* 


0*245 


740040 


F-448 


HALT 


**246 


207647 


/ 


LAC KHALT 


.7 2 4 7 


155555 




F)ZM 15555 


0*250 


215555 




LAC 15555 


0*251 


740200 




SZA 


0*252 


740040 


F449 


HALT 


0*253 


207647 


/ 


LAC KHALT 


0*254 


156666 




nZM 16666 


<**255 


216666 




L.AC 16666 


0*256 


740200 




S2* 


0*257 


7 4 4 


F450 


HALT 


0*260 


207647 


/ 


LAC KHALT 


0*261 


157777 




fl?v 17777 


0*262 


217777 




I. AC 17777 


0*263 


740200 




sz* 


0*264 


740040 


F 451 


HALT 



/AC = 740040 

/ADD" 1111 OR 01111 



/FRROR. DZM FAILED AT 1111 
/OR "1111 



/AC = 740040 



/FRRDR. DZM FAILED AT 1222 OR 
/02222 

/AC = 740040 



/ERROR. DZM FAILEO AT 13333 OR 
/03333 

/AC = 740040 



/ERROR. DZM FAILED At 14444 
/OR 04444 

/AC = 740040 



/ERROR. DZM FAILEO AT 15555 
/OR 05555 

/AC = 740040 



/ERROR. DZM FAILEO At 16666 
/OR 06666 

/AC r 74f<040 



/ERROR. DZM FAILED At 17777 
/OR 07777 



.EJECT 



iA>EY9 
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0*265 


20 7 64 7 




LAC KHALT 


<?6 6 


152525 




0Z« 1?5?5 


0*267 


21252^ 




LAC 12^25 


03270 


74020!-' 




S?t 


03?71 


740040 


M 5 ? 


HAl T 


0*272 


207 fi 47 


/ 


LAC KHALT 


03273 


15525? 




nZM 15?52 


03274 


21525? 




LAC 15252 


03?75 


740?00 




S2* 


03276 


740040 


1453 
/ 


HALT 






/ 

/TEST AC AFTFR A OZM 


0*277 


20 7 5 7 2 


/ 


LAC K 7 S 


03300 


157777 




OZM 17777 


03301 


740001 




CMA 


0*302 


740200 




SZA 


0*303 


740040 


F454 


HALT 



/AC 



74004p 



r/3 30 4 
5) ■'305 
03306 
03307 
03310 
03311 
03312 
03313 
03314 
03315 
03316 



0*31 7 
33320 
433?1 
«*32? 
03323 
03324 
03325 
0*326 



754001 
307572 
157777 
740001 
740200 
740040 
741400 
740040 
217777 
740?00 
740040 



20 7 5 7 2 
152525 
155252 
157777 
150000 
740001 
750200 
740040 



/ERROR 
/OR 02525 



OZM FARED AT 12525 
/AC = 740040 



/ERROR. n?H EAILEO AT 15252 OR 05252 



/AC 



777777 



/ERROR. AC CHANGED AFTER A 0?M 



//TEST AC, LINK, ADR. 17777 OR 07777 AFTER A DZM 

/ 

/AC = 1 'S, LINK : f 





CLA!CMA!CLL 




AOP K7S 




Q2M 17777 




CMA 




SZA 


F455 


HALT 




SZL 


F456 


HALT 




LAC 17777 




SZA 


F457 


HALT 


/ 




/ 




/SEQUENTIAL OHM 


/ 






LAC K 7 S 




nH'-' 12525 




f!2v 1525? 




DZM 17777 




D Z t- 1 -A 




CMA 




CLA !S2* 


: 4 58 


HALT 



/ERROR. AC NOT i'S AFTER A OZM 
/FRROR. LINK NOT 



/FRROR. 



DZM FAILED AT 177777 OR 07777 



/AC r l'S 



/AC = 



/FRROR. AC NOT l'S AFTER 
/OZM SERIES 



.EJECT 



PACE B7 



0*3? 7 


35?5?5 




TAO 1?';?5 


>< <3 30 


35575? 




TAT, 15752 


0"<331 


357777 




T AM 17777 


0*3.32 


350000 




TAP 10000 


.3*33 3 


7 4 ? 




S/< 


.r<334 


740040 


F459 
/ 


HALT 


' <335 


4 4 76 33 


IS? WORKS 


0*336 


60372? 




JMP D?*AC 


0*337 


10610? 




JMS GENRAN 


<A * 3 4 


1061 ?6 


/ 


J MS CKNO 






/ 

/TEST 
/ 
DACAC 


DAC 


.71*341 


? 07 5 7 3 


LAC K51S 


■'33342 


0511 11 




QAC 11111 


0*343 


551111 




SAO 11111 


51*344 


741000 




SKP 


3 3 45 


740040 


E460 


HALT 


3 3 4 6 


707574 




LAC Ki?S 


0-347 


05???? 




nAC 12722 


(1*350 


55??2? 




SAO 12722 


0*351 


741000 




SKP 


0*35? 


740040 


F461 


HALT 


0*353 


?07 t >7 t > 




LAC K13S 


<V.'354 


5 33 33 




OAC 13333 


A ''355 


553333 




SAD 13333 


1*356 


741.000 




SKP 


3 357 


740040 


F46? 


HALT 


'-3*360 


207576 




LAC K^aS 


■3*361 


054444 




OAC 14444 


'3*36? 


554444 




SAD 14444 


0*363 


741000 




S KP 


0*364 


740040 


F463 


HALT 


'3*365 


707^77 




LAC Kj5S 


■'3*366 


055555 




OAC 15555 


0*367 


555555 




SAO- 15555 


0*370 


741000 




S KP 


'3*371 


740040 


F464 


HALT 
.EJECT 



/FRROR. D2M FAILED 

/CHFCK DONE LOOPING 

/LOOP 

/GET NO. FOR NEXT LOOP 



/AC = 11111 



/ERROR. DAC ADR CONTENTS NOT EQUAL 
/TO AC. OAC FAILFD 
/AC r 122222 



/ERROR. 122222 OR 022222 CONTENTS 
/NOT r TO AC. DAC FAILED 
/AC 1 13333 



/ERROR. 13333 OR 03333 CONTENTS 
/NOT = TO AC DAC FAILED 
/AC = 14444 



/ERROR. 14444 OR 03333 CONTENTS 
/NOT s TO AC. DAC FAILED 
/AC = 15555 



/ERROR, 15555 OR 05555 CONTENTS 
/NO = AC. DAC FAILED 



<asfv<) 



PAGE 5« 



0-<3 7 2 


20 7 6 




LAC K1/.S 


3 373 


056666 




n a r : 16^66 


-3 7 4 


556666 




sad 1 6 A 6 6 


i-1 .1 3 7 =5 


7 410 




SKP 


* .3 7 6 


7 4 4 


f- 465 


HAt T 


■■13 3 77 


207601 




LAC Ki?S 


< 4 


5 7 7 7 7 




oac 1 7777 


l 4 1 


557777 




SAL 17777 


0340? 


741000 




SKR 


0-^403 


7 4 4 


1-46.6 


HALT 


tf34fi4 


2076 4 




LAC Kpil a 


03405 


052525 




AC 12525 


03406 


552525 




SAL 12525 


3 40 7 


741000 




S KP 


03410 


740040 


t 4 6 7 


HALT 


03411 


207605 




LAC KlH 


03412 


055252 




DAC 15?52 


03413 


555252 




SAD 1525? 


0341 4 


741000 




SKP 


03415 


740040 


F 4 6 P 

/ 

/ 

/SFQUEN 

/ 


HALT 






TIAL DAC 


0341 ft 


744000 


CLL 


03417 


207572 




L A f • K 7 S 


03420 


052525 




OAC 12525 


034?1 


05525? 




OAC 15?52 


03422 


057777 




DAC 17777 


03423 


051000 




OAC ll"i00 


03424 


0511 11 




DAC 11111 


03425 


740001 




CM A 


03426 


750200 




CLA *SZA 


034?7 


740040 


M69 


HAl T 


03430 


312525 




ADD 12525 


03431 


315252 




ADD 15252 


03432 


317777 




ADD 17777 


03433 


31 1000 




ADD 11000 


^-'434 


311111 




ADD 11111 


0"M35 


740001 




CM A 


« 3 4 3 6 


740?00 




S?A 


0--437 


7 4 0P40 


t 4 70 


HAt T 


0'4 40 


447633 


/ 


IS? WOHK3 


7 4 4 1 


603341 




J MP DACAC 


"* 4 4 2 


106102 




JMS GENRAN 


M M43 


1061 26 




JMS CKMO 
.EJECT 



/AC = 166666 



/FRROR. 16666 OR 0666ft CONTFNTS 
/NOT = AC, DAC FAILED 
/AC = 17777 



/FRROR. 17777 OR 07777 CONTFNTS 
/MOT = AC. DAC FAILFD 
/AC = 252525 



/FRROR. 12525 OR 02525 CONTFNTS 
/AC = AC. OAC FAILED 
/AC = 52525? 



/FRROR. 15252 OR 0525? CONTFNTS 
/NOT - AC. OAC FAILFD 



/L = 
/AC = 1 *S 



/AC 







/ERROR. 

/ONES 

/ONFS 

/ONES 

/DNFS 

/ONES 

/AC = 



AC NOT J 'S AFTER DAC SERIES 



/FRROR. DAC FAILED. 
/ADDRESSFS NOT ONES 

/CHECK DONE LOOPING 

/( OOP 

/GET NO. FOR NFxT LOOP 



ONE OR MORE 



p«r,F 







/H ST 


IS/ 


a ">■ 4 4 4 


?07530 


/ 

i s / a r: 


LAC K,1 


■A ' 4 4 5 


0501 00 




llAf 10100 


.< 4 4 6 


4 5 010 




IS/ 10100 


a <447 


751001 




SKP !CL \ !CMA 


0'450 


740040 


(•"471 


HALT 


3 451 


507531 




A Nil K1 


•;.13 4 5? 


5501 00 




SAO 10100 


»M53 


741 000 




SKP 


0-454 


740040 


F47? 


HAL T 


03455 


?076?6 




LAC M400K 


03456 


050100 




f)AC 10100 


0*457 


450100 




IS/ 10100 


0">460 


751001 




SKP!CLA !CMA 


3 4 6 1 


740040 


E473 


HALT 


3 462 


507553 




A Nil K400K 


03463 


550100 




SAD 10100 


0*464 


741000 




SKP 


'465 


740040 


E474 


HALT 


:< 4 ft 6 


?07*?0 




LAC Ml 


0*467 


0501 00 




OAC 10100 


03470 


450100 




is/ 10100 


03471 


751001 




SKP ;CLA.CMA 


3 4 7? 


740040 


E475 


HALT 


03473 


50757? 




A NO K7S 


3 4 7 4 


5501 00 




SAD 10100 


03475 


741000 




SKP 


<476 


740040 


E476 


HALT 


;34 77 


207*20 




LAC Ml 


0* 500 


057777 




nAC 17777 


03501 


457777 




IS/ 17777 


3 50? 


751001 




SKP;CLA !CMA 


<503 


740040 


F477 


HALT 


0*504 


50757? 




ANf> K7S 


3 505 


557777 




SAL, 17777 


0^506 


741 000 




SKP 


0*507 


740040 


F478 


HALT 


3 5 1 


?0 7 6?6 




LAC M400K 


0*511 


057777 




nAC 17777 


0351? 


457777 




IS/ 17777 


0*513 


751001 




SKP ;CLA !CMA 


3 5 1 4 


740040 


F 4 7 9 


HALT 


0*515 


507553 




AND K400K 


* 5 1 6 


557777 




SAD 17777 


0*51 7 


741000 




SKP 
.EJECT 



/AC = 



/FRROR. IS? SKIPPFD 
/AC = 1 



/FRROR. 10100 OR 00100 NOT 1 
/IS? FAILED 
/AC : 377777 



/ERROR. IS? SKIPPFO 



/ERROR. 10100 OR 00100 NOT 40000P 
/IS? FAILED 
/AC = 777776 



/ERROR. IS? SKIPPED 



/ERROR. 10100 OR 00100 NOT 777777 
/IS? FAILED 
/AC r 777776 



/FRROR. IS? SKIPPFD 



/ERROR. 1777 OR 07777 NOT 777777 
/IS? FAILED 
/AC = 377777 



/FRROR. IS? SKIPPFD 



<ASEy9 



PAGE 



035?0 


740040 


3 521 


20 7 5 3 


0352? 


3 5 7 7 7 7 


3 3 5 2 3 


457777 


;"R?4 


7 510 01 


0^525 


7 4 00 4 


3526 


507531 


»'5?7 


557777 


03530 


741000 


03531 


740040 


03532 


750000 


03533 


24757? 


03534 


051111 


03535 


451111 


'536 


740040 


3 53 7 


21 11 11 


03500 


740200 


03541 


740040 


0354? 


750000 


0354 3 


24757? 


B3544 


052222 


,>^545 


45222? 


0*546 


740040 


W3547 


21 222? 


03550 


740200 


3551 


740040 


03552 


750000 


03553 


24757? 


03554 


053333 


03555 


453333 


03556 


740040 


03557 


213333 


3 56 


740200 


03561 


740040 


03562 


750000 


03563 


P4757? 


'564 


054444 


0-565 


454444 


", '566 


740040 


3 5 6 7 


214444 


< 5 7 


740200 


0357] 


7 4 4 



f 4H0 



481 



F 482 



F483 



F 484 



f- 4 85 



f 486 



F 487 



F48£ 



F489 



F490 



HALT 

I AT KM 
rHC 17/77 
IS/ 17777 
SKI' !CL-' !0 MA 
HAI T 
AN'' K 1 
SAL 17 7 7 7 
SKF 
HALT 

CIA 

XOI< K7S 

n ac 11111 

IS? 11 11 1 

HALT 

LAC 11111 

S£A 

HALT 

OLA 

XOR K7S 

DAT 12?22 

IS? 12222 

HALT 

I 40 1 2 2 22 

S/A 

HAI T 

CLA 

XOK K7S 

FiAC 133J3 

IS-- 13333 

HAL T 

LAC 13 333 

S?'- 

HALT 

CLA 

XOL K7S 

n A f : 14 4 4 4 

IS-/ 14 4 4 4 

HAI T 

I ft f t 4 a 4 4 

S?A 

HAI T 

.EJECT 



/ERROR. 17777 OR 0777 NTOT 400000 

/IS? failed 



/ERROR. IS? SKIPPED 



/ERROR. 17777 OR 07777 NOT 1 
/IS? FAH EO 
/AC = 
/AC = 1 'S 



/ERROR. IS? EAILFO TO SKIP 

/ERROR. 11111 OR 01111 NOT 
/IS? FAILED 
/AC - 
/AC = 1 'S 

/ERROR. IS? EAILFO TO SKIP 



/ERROR. 12222 OR 02222 NOT 
/IS? FAILED 

/AC = 1 'S 



/ERROR. IS? DID NOT SKIP 

/ERROR. 13333 OR 03333 NOT 
/IS? FAILED 

/A C = 1 'S 

/ERROR. IS? DID NOT SKIP 

/FRROR. 14444 OR 04444 NOT 
/IS? E A I L E n 



r vg 



p*r,F 61 



'■ '■ 3 5 7 7 


750000 




CL' 


0:<5 73 


7 4 7 5 7? 




XOR K7S 


0-574 


055555 




DAC 15555 


'575 


455555 




IS' 15555 


0'576 


740040 


F 491 


HALT 


"< 5 7 7 


215555 




I 4C 1 5555 


0<600 


740200 




S?' 


7 601. 


740040 


F49? 


HA! T 


<60 7 


750000 




CL« 


7603 


74757? 




X0» K75 


'/ <60 4 


056666 




n AC 16666 


a ■' 6 5 


456666 




IS-' 1 6 A 6 6 


« ■' ft 6 


740040 


F 4 9 3 


HALT 


.-)-<ft07 


?16666 




LAC 16666 


3 ■< 6 1 


740?00 




S?A 


■17611 


7 4 00 4 


F494 


HALT 


761 2 


750000 




CLA 


0"<61 3 


24757? 




XOF K7S 


0761 4 


057777 




DAC 17777 


7 615 


457777 




IS? 17777 


07616 


7 4 00 4 


t 495 


HALT 


7-617 


217777 




LAC 17777 


<*76?0 


740200 




S?A 


07621 


740040 


F49A 


HALT 


'<6?2 


750000 




OLA 


07.623 


74757? 




XOR K7S 


0^6?4 


0525?5 




HAC 12525 


03625 


452^25 




IS? 12525 


<6?6 


740040 


F49 7 


HALT 


03627 


21 2525 




LAC 12S25 


07.630 


740200 




S?A 


7 631 


7 4 4 


/ 

F498 


HALT 


07632 


750000 




CLA 


07633 


24757? 




XOR K7S 


7 634 


055252 




DAT 15252 


7 635 


455252 




IS? 15252 


-636 


740040 


F499 


HALT 


07637 


715252 




LAC 15252 


07640 


740700 




S;A 


7 6 41 


7 4 4 


F500 


HALT 



/AC : 1 'S 



/FRROR. IS? DID NOT SKIP 



/FRROR. 15555 OR 05555 NOT 
/IS? FAILED 

/AC = 1 'S 



/ERROR. IS? DID NOT SKIP 



/ERROR. 16666 OR 06666 NOT 
/IS? FAILFO 

/AC = 1 'S 



/FRROR. IS? DID NOT SKIP 



/ERROR. 17777 OR 07777 NOT 
/IS? FAILED 

/Ac = 1 *S 



/ERROR. IS? DID NOT SKIP 



/ERROR. 12525 OR 02525 NOT 
/IS? FAILED 

/AC = l'S 



/FRROR. IS? DID NOT SKIP 

/ERROR. 15252 OR 05252 NOT 
/IS? FAILED 



.EJECT 



•' 4 . ^ F V Q 



P A G E ft 2 



m st 
/ 



IS;?, SKP 



07 64 2 
<64 3 
! 6 4 4 
! 645 
7 ft 4 6 
?. <64 7 
07650 
07651 
07652 
07653 
07654 
07655 
07656 
07657 
07660 
7 661 
03662 
07663 
07664 
07665 
7'6fi6 
< 6ft 7 
07670 
07671 



03672 
07673 
07674 
07675 
07676 
07677 
07700 
0^701 
03702 
0-*703 
07704 
'705 

0"*70ft 
7 707 
3 7 710 

7 711 
7 712 
07713 
7 714 
07715 



2 7 5 7 2 
/1 5 2 5 2 5 
15 5 2 5 2 

3 5 7 7 7 7 
K 1 C-7^ 
7 5 1 
452525 
7 410 
455252 
741000 
457777 
741000 
451000 
741000 
450100 
740040 
312525 
315252 
317777 
3110 
710100 
7 4 01 
7 4 2 00 
7 4 4 



207626 
052525 
055252 
057777 
051000 
050100 
452525 
455252 
457777 
451 000 
4501 00 
7 5 00 00 
31 2 S 25 
315252 
317777 
311 000 
31010 
247554 
740200 
7 4 4 





I AC 


K7 •• 




rue 


12) 25 




oa<: 


15 52 




;1AC 


1 7 '77 




rut. 


1 1 ' 7 




f)AC 


1 1 




IS? 


1 25 25 




SKP 






IS? 


1 5 252 




SKP 






IS? 


17777 




SKP 






IS? 


1 1'00 




SKP 






IS? 


101 00 


F501 


HALT 




ADO 


12525 




ADO 


1525? 




a on 


17777 




Ann 


1 1700 




40n 


101 00 




CM A 






S?A 




f 502 


HAL 1 


r 


/ 

/SEQUENTIAL IS?, NO-SKIP 


/ 








LAC 


M4H0K 




OAC 


12^25 




nAC 


15^52 




n a c 


1 7777 




dac 


110 




n a c 


101 00 




IS? 


12525 




IS? 


15252 




IS? 


17 7 7 7 




IS? 


1 1 '00 




IS? 


10100 




CLA 






Ann 


1 2-25 




aoii 


15252 




ADD 


17 7 7 7 




a n 


1 1 '00 




a on 


1 "• 1 




xOp 


K472K 




S?A 




T503 


HAL 


T 




.EJECT 



/AC r 1 'S 

/12525 OP 02525 

/15252 OP 05252 

/I 7777 OP 07777 

/ 1 1 OP 010 

/10100 OR 00100 



/ERROR. IS? OlD NOT SKIP 



/FRROP. ALL AORS. NOT 



/AC = 377777 

/OR 02525 

/OR 05252 

/OR 07777 

/OR 01000 

/OR 00100 



/AC = 



/PESnLT = 400002 

/ERROR. ALL AODRS. NOT 400000 



63 



m 
/ 



ST IS/-SKP, SKIP 



^■■'71 6 
4 <71 7 
^7?0 
' 7 ? 1 
3 72? 
03723 



0^724 
03725 
0~<726 
0^727 
0>730 
^•731 



03 7 32 
"-•7 33 
0*7.34 
it ! 735 
03736 
«->737 
-740 

03741 
?374? 
0*743 
0*744 



207^72 
^ 5 5 ? 5 ? 

45525? 
741000 
7 410 
740040 



20 75 7? 
05525? 
741000 
740000 
455252 
740040 



207530 
5 5 2 <5 2 
741000 
740000 
455252 
741000 
740040 

447633 
6 34 4 4 
106102 
1061 26 



LAC 

D»r 
1 Sr 
S«P 
SKP 

HAL 1 



1 5?52 
1 5?5? 



E504 

/ 

/TFST SKP-IS?, S«IP 

/ 

LAC K7« 

OAC 15?52 

S KP 

NOP 

IS? 15252 
F505 HALT 
/ 

/TFST SKP-ISH, NO-SKIP 
/ 



F50< 
/ 



LAC 


K0 


nAc 


15252 


SKP 




NOP 




IS? 


15252 


SKP 




HAL 


r 


IS? 


WORKS 


JMP 


IS?AC 


JMS 


GENRAN 


JMS 


CK'iO 


.EJECT 



/AC = 1 «S 



/ERROR. IS2-SKIP OH) NOT SKIP 



/AC = 17S 



/ERROR. SKP-IS2 DID NOT SKIP 



/AC = 



/ERROR. SKP-ISH SKIPPEO 

/CHFCK DONE LOOPING 
/LOOP 

/GET NO. EOR NEXT LOOP 



, 4 - . f y <? 



PAGE ft ^ 







/TEST J«I J 
/ 




07745 


'07666 


LAO JM'-RET 


PI < 7 4 6 


7 4 2 3 




S?A 


07747 


7 4 4 


i 5;'7 


HALT 


(i 1 7 5 


2P41 30 


! N I T •> K 


1 AT JH> ; SEO 


"7751 


4 7 ft 6 6 




DAC JM'-SFT 


?^7 C 52 


203752 




1 AC . 


07753 


50755S 




AMp Kl K 


07754 


740200 




S ?A 


07755 


603761 




JHP .*•■> 


07756 


207555 




1 AC K1 : 'K 


07 757 


047627 




DAC RJONT 


07760 


603765 




JHP , +s 


07 761 


207540 




1 AC K?0 


07762 


047627 




OAO RJONT 


07763 


741000 




SKP 


07764 


147666 




n?H JMORFT 


07765 


2041 30 




LAC JMt-'SEO 


07766 


067627 




DA Co RJCNT 


07.767 


447627 




IS? RJCNT 


07770 


207627 




LAC RJCNT 


07771 


546061 




SAC Ki/777 


0.7772 


74 10 




SKP 


07773 


60 3764 




JHP . -7 


07774 


207666 




LAC JMPRET 


0<775 


74 0200 




SZA 


07776 


740040 


F508 


HALT 


07777 


2041 31 




LAC MOO 


0.5000 


043745 




DAC E507-2 


04001 


740000 


MOPX 
/ 


NOP 


0*5002 


207667 


LAC J111 


0-5003 


740200 




S2A 


0<i004 


740040 


E509 


HALT 


04005 


2041 32 




LAC RJ111 


04006 


047667 




DAC J111 


04007 


051111 




nAC urn 


4 010 


611111 




jmp mil 


0401 1 


741000 




SKP 


4 01? 


147667 


PJMP; 


d?m Jin 


04013 


207670 




LAC J222 


4 014 


7 4 2 




S?A 


04 01 5 


7 4 4 


F510 


HA t T 


4 016 


2041 33 




LAC RJ'-'22 


0401 7 


4 7 6 7 




nAC J222 


040?0 


052222 




OAO 12222 


0402J 


612222 




JMP 12?22 


04 022 


741000 




SKP 


04023 


147670 


RJMP- 


D?M J?22 
.EJECT 



/ERRnR JMP .-7, .+4 OR .+5 TAILED 
/LOAD 4K WITH JMP TO 70 
/SFE IE IN UPPrR 4K NOW 

/IN ||PPEp 4K 
/l.OWFR 4K 



/CLEAR ERROR TABLE 

/STORE JMP 70 
/INCR. ADDRESS 

/WILL = SAC 07777 WHEN IN 
/ UPPER 4K 



/FRROR. JMPP.+4, ,+5 OR .-7 FMLF.H 
/PRFSS CONTINUE TO OFTFRMINE 
/JMP FAILURE 



/ERROR. RJMP OR JMP TO 11111 
/OR 01111 FARED 

/STORE JMP ADDRESS IN TABLE 

/JMP TO 1 1111 OR 01111 

/CLEAR ERROR WORD TARLF 



/FRRnR. PJmP OR J"P To 12222 
/OR 02222 EARED 



/JMP 1222 OR 02222 
/CLEAR ERROR TABLE 



■A ■f*9 



PAGF 65 



04024 


207671 




LAC J333 


■a.sflp'S 


740200 




SZ'. 


-'4 0?6 


740040 


F511 


HALT 


04027 


2041 34 




LaC RJ^33 


4 3 


047671 




DAC J533 


04031 


053333 




DAC 13333 


""032 


61 3333 




JMP 13333 


04033 


741000 




SKP 


3-5034 


147671 


P J M P 3 


OZM J333 


04 035 


20767? 


/ 


LAC J 4 4 4 


04036 


740200 




SZA 


04037 


740040 


F512 


HAi T 


04040 


20413*5 




LAC RJ444 


04041 


04767? 




DAC J444 


04042 


054444 




DAC 14444 


04043 


61 4444 




JMP 14444 


04044 


741000 




SKP 


04045 


14767? 


RJMP4 
/ 


DZM J444 


04046 


207673 


LAC J555 


04047 


740?00 




SZA 


0<;050 


740040 


E513 


HA L T 


04051 


204136 




LAC RJ555 


04052 


047673 




DAC J555 


04053 


055555 




DAC 15555 


04054 


615555 




JMP 15555 


04055 


741000 




SKP 


4 056 


147673 


RJMPS 
/ 


DZM J555 


0<!057 


20767" 


LAC J666 


04060 


740200 




SZA 


04061 


740040 


F51 4 


HA|.T 


04062 


204137 




LAC RJ666 


04063 


047674 




DAC J666 


04064 


056666 




DAC 16666 


04065 


616666 




JHP 16666 


04066 


741000 




SKP 


04067 


147674 


RJMP6 
/ 


DZM J666 



/ERROR, RJMP OR JMP TO 13333 
/OR 03333 FAILED 



/JMP TO 13333 OR 03333 
/CLFAR ERROR TABLE 



/ERROR. RJHP OR JMP TO 14444 
/OR 04444 FAILEO 



/JMP TO 14444 OR 04444 
/CLEAR ERROR TABLE 



/ERROR- RJMP OR JMP TO 15555 
/OR 05555 FAILED 



/JMP TO 15555 OR 05555 
/CLEAR ERROR TABLE 



/ERROR. RJMP OR JMP TO 16666 
/OR 06666 FAILED 



/JMP TO 16666 OR 06666 
/CLEAR ERROR TABLE 



•EJECT 



<ase x9 



PARE 66 



0-5(170 
0^071 

0407? 

4 7 3 
0-107 4 
4 7 5 
t. 7 6 
4077 
0^100 

04101 
0"102 
04103 

04104 
04105 
04106 
04 J07 
04110 
04H1 

'.'■4 11? 
04U3 
04114 

04115 

04H6 
04117 
041?0 
04121 
041?? 

041?3 
04124 

04i?5 
04l?6 
04127 



04130 
04131 
0413? 
04133 
04 134 
04 135 
04 136 
04137 

04140 

04141 
04142 



707675 
74 2 00 

7 4 4 

204 1 40 
4 7 6 7 5 
057777 
617 7 7 7 
74100!^ 
147675 

207677 
740200 
740040 

204141 
047677 
052525 
612525 
741000 
147677 

207676 
740200 
740040 

2041 42 
047676 
05525? 
615252 
741000 
147676 

447633 
604002 
10 610? 
106126 
6041 43 



600070 
60400? 
60401? 
604023 
6 4 34 
604045 
604056 
604067 
604100 
6041 11 
6041 2? 



(515 



f'JMP? 
/ 



f 51 6 



R JMPri 

/ 



F517 



RJM 
/ 



P9 



I. AC 


J 7 77 


S?A 




HAI. ■ 


r 


LAP 


R J 7 7 7 


DAT 


J 7 77 


DAD 


17 7 7 7 


J MP 


17 7 7 7 


SKP 




0?M 


J777 


LAC 


J?52 


S?A 




HA| n 


r 


LAC 


PJ --52 


CiAC 


J 25 2 


OAR 


12^25 


JMP 


125 25 


SKP 




n?M 


J?52 


LAC 


J" 5 


SZA 




HA l." 


r 


LAC 


RJ525 


flAC 


J5->5 


OAC 


15?52 


JMP 


1525? 


SKP 




nHH 


J5?5 


IS? 


W0RK3 


J HP 


Monx+i 


JMS 


RENRAN 


JMS 


CKS-JO 


JMP 


TSCAL 



/ERROR. RJMP OR JMP TO 17777 
/OR M7777 FAILED 



/JMP TO 17777 OP 07777 
/CLEAR ERROR TABLE 



/ERRnR. RJMP OR MP T 12525 
/OR 02525 FAILEO 



/JMP TO 1.2525 OR 02525 
/CLEAR ERROR TABLE 



/ERROR. RJMP OP JmP TO 15252 
/OR 05252 FAILED 



/JMP TO 15252 OR 05252 

/CLEAR ERROR TABLE 

/CHECK DONE LOOPING 
/LOOP 
/GET NO. FOR NExT LOOP 



/ 

/JM 

/ 

JMP 
'■'Off 

Rj1 
Rj? 

RJS 
RJ4 
RJ5 
RJ6 
WJ7 
PJ? 
PJ5 



/TEST CAL 

P CONSTANTS. THESE ARE MODIFIED WHEN IN HI 4K 
Sr Q 



1 1 
2? 

3 ! 

4 4 

5 5 

6 6 
77 
5? 
25 



JMP 


SE'JUEN 


JMP 


MO iX + 1 


JMP 


RJ1P1 


JMF 


R.JMP? 


JMP 


RJMP3 


JMP 


RJ'<P4 


JMP 


RJMP5 


JMP 


RJMP6 


JMP 


R JMP7 


JMP 


RJMP8 


JMP 


RJMP9 


.EJI 


:ct 



- FY9 
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55*143 
0*144 
0*145 
^ - 1 4 6 

0«147 
4 1 "50 

514151 

04152 
0415J 
0* 154 
4 155 
04156 
04157 

04 160 

04161 
04162 
04 163 
04164 
04165 
04166 



207700 
743200 
740040 
707704 
754000 
770020 
150704 
20756? 
047700 
204215 
040021 
61 0704 
147700 
200020 
544216 
741000 
740040 
210704 
740200 
740040 



0*167 


207701 


04 170 


740200 


3/:l7l 


740040 


0*172 


74400? 


04173 


207563 


04174 


047701 


04} 75 


204217 


04176 


040021 


04177 


61 0704 


04200 


147701 


4 201 


200020 


04 ?02 


544?20 


04203 


741000 


0<i 20 4 


740040 


0/120 5 


210704 


04206 


740200 


0*207 


740040 


/*210 


447633 


0421 1 


6041 43 


04212 


10610? 


4 213 


106126 


04214 


604221 



m st 
/ 

TSCAl 
F518 



RCALS0 



E5l9 



E 5 1 9 A 
/ 

/TEST 
/ 



F520 



RCALSi 

E521 

E521* 
/ 



I AC 

S2a 

HA| T 

I.EM 

CLA ! 

I. A '„ 

D?M 

LAC 

OAC 

LAC 

oac 

JMP 

o?m 

LAC 

sAn 

SKP 

HALT 

LAC 

SZA 

HALT 



CAi 



CLI 

10020 

10704 

K2021 

CAI.0 

RCAL0 

21 

10704 

CAI 

20 

KCAL0 



10704 



CAI. LINK = 1 



LAC 


C A 1 . 1 


SZA 




HALT 


CLLI 


ICML 


LAC 


K2120 


DAC 


CALi 


I.AC 


RCAL1 


OAC 


21 


JMP 


10704 


02M 


CAi 1 


LAC 


20 


SAD 


KCA|_F 


<;KP 




HALT 


LAC 


10704 


S2A 




HA L J 


IS? 


W0 i; 'K3 


JMP 


TSCAL 


JMS 


GE^lRAN 


JMK 


CKMO 


JMP 


TS.JMS 



/ERROR. CAl FROM 17757 OR 07757 

/CLEAR EXTEND MODE 

/AC = 0, LINK = 

/AC = 770020 

/CAL AT 10704 OR 00704 

/STORE ERROR CODE 2021 

/RJMP FROM CAL 

/JMP TO 10704 OR 00704 

/CLEAR ERROR TABLE 

/10705 OR 00705 

/ERROR. (20) NOT 10705 OR 00705 

/FRROR (10704 OR 00704) NOT 



/ERROR. CAL FROM 10704 OR 00704 
/LINK = 1 

/STORE ERROR CODE 2120 

/RJMP FROM CAL 

/JMP TO 10704 OR 00704 

/CLEAR ERROR TABLE 

/410705 OR 400705 

/ERROR. (20) NOT 410705 OR 400705 

/FRROR (10704 OR 00704) NOT 

/CHECK DONE LOOPING 
/LOOP 

/GET NO. FOR NExT LOOP 

/TEST JMS 



.EJECT 



<A^E*9 
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0*215 


604157 


0*21 6 


010705 


0*21 7 


604?00 


a*2?0 


41070^ 



/CAL CONSTANTS, THESE A«E MOnlFlEn WHEN IN HI 4K 
/ 

KCAL ' JMP RCiLSf! 
K C A L / 10 7 05 
KCAl 1 JMP HCaLSI 
K c A L t- 4 1 M 7 5 
.EJECT 



■ f v q 



P 4 r, F 6 9 



*«2?\ 


20773? 


0*222 


740200 


: J "223 


740040 


4 2 2 4 


744000 


0'225 


204537 


04226 


0511 1? 


0*22 7 


2 4 5 4 


•11230 


047777 


0*231 


047702 


0->232 


77111? 


04233 


607777 


0*234 


14770? 


0*235 


21 1111 


0*236 


544541 


Hi 23 7 


741000 


04240 


74 4 


0*241 


207703 


0*242 


740200 


04 ? 43 


740040 


04244 


707704 


04245 


744000 


04346 


20454? 


0^247 


052223 


04250 


204543 


01251 


047776 


04252 


047703 


4 2 5 3 


772223 


04 254 


607776 


4 255 


147703 


04256 


21222? 


04257 


544544 


0*260 


741000 


04261 


740040 


04262 


207704 


0*263 


740200 


04264 


740040 


04265 


707704 


04266 


744000 


4 267 


204545 


04270 


053334 


0*271 


204546 


0-5272 


047775 


^"273 


047704 


0*274 


773334 


04 275 


607775 



/TfST j*s 
/ 

tsjmt lac js;"71 

E5?2 HAi T 



RJMS71 



F5?3 



F5?4 



PJMS72 



F525 



F5?6 



CLL 
LAC 

rue 

LAC 

oac 

OAC 
LAW 
JMP 

2K 

1 AC 
SAO 
SKP 
HAi 1 



RJSM71 

111 12 

RS*71 

07777 

JS'<71 

11112 

07777 

JSM71 

11111 

Kl-4000 



LAC JS*7? 

SZA 

HALT 

LEH 

CLL 

LAC RJSM72 

OAC 12223 

LAC RSM72 

OAC 07776 

OAC JSM72 

LAW 12223 

JMP 07776 

D2M JS^72 

LAC 12222 

SAO K77 
SKP 
HALT 

LAC JSM73 

S?A 

HAL T 

LEM 

CLL 

LAC RJSM73 

OAC 13334 

LAC RS"73 

f)AC 07775 

DAC JSH73 

LAW 13334 

JMP 07775 

.EJECT 



/ERROR. JmS FROM 07777 TO 11111 
/OR FROM 17777 TO 01111 
/LINK = 

/JMP TO RJMS71 
/RJMP FROM JMS DEST'N 
/JMS 11111 



/AC = 771112 
/CLEAR ERROR TABLE 



/ERROR. (11111 OR 01111) NOT 
/10000 OR 00000 



/ERROR. JMS FROM 07776 TO 12222 
/OR FROM 17776 TO 02222 



/JMP TO RJMS72 



/JMS 12222 

/AC = 772223 
/CLEAR ERROR TABLE 



/ERROR. (12222 OR 02222) NOT 
/07777 OR 17777 



/ERROR. JMS FROM 07775 jO 13333 
/OR FROM 17775 TO 03333 



/JMP TO RJMS73 



/JMS 13333 



/AC = 773334 



<A-.FV9 



pACF 7!? 



04276 


147704 


P JMS 73 


f)2M JS '73 


•' ? 7 7 


213333 




LAC 13<33 


i*'300 


544^47 




S An K7-- 


0^301 


74 1 00 




SKP 


^.30? 


7 4 0-"4(<- 


y 5/7 


HA1 T 


04303 


?0770 t; 




LAC JS-'7 4 


514304 


7 4 ? 




SZA 


04305 


740040 


F5?h 


HALT 


04306 


707704 




I.EM 


04307 


744000 




CLl 


0^310 


204550 




LAC RJSM74 


■?4 31i 


054445 




OAC 1**45 


0*312 


204551 




[AC RS-174 


511313 


047774 




DAC 07774 


04314 


047705 




DAC Js M 74 


04315 


774445 




LAW 14445 


0^316 


607774 




JMP 07774 


0*317 


147705 


R JMS 74 


nZM JS'"74 


04320 


21 4444 




LAC 14444 


04321 


54455? 




S ATI K7 r - 


0*3?2 


741000 




SKP 


fl43?3 


740040 


F5?9 


HAt T 


0*324 


20770ft 




LAC JS"!75 


04325 


740200 




S?^ 


0*3?6 


740040 


F5 30 


HAL T 


0*327 


707704 




LFH 


04330 


744000 




CLL 


04331 


204553 




LAC RJSM75 


04332 


055556 




n A C 15 5 56 


04333 


204554 




LAC RSM75 


04334 


047773 




dac 07773 


04335 


047706 




DAC Js M 75 


04336 


775556 




LAW 15556 


04337 


607773 




JMP 07773 


04340 


14770ft 


RJMS75 


OZM JSM75 


0434J 


215555 




LAC 15555 


04342 


544555 




SAP K7 i 


04343 


741000 




SKP 


04344 


74004M 


E531 


HAl T 


04345 


207707 




LAc JS '7ft 


4 34 6 


740-00 




SZA 


4 3 4 7 


740040 


F53? 


HALT 



/CLFAR ERROR TARLF 



/ERROR. (13333 OR ' 3 ' -3 3 ) NOT 
/■A777f- OP 1777ft 

/FRROR. JMS F«OM «7774 T 14444 
/OR rROM 17774 TO M444 

/JMP RJMS74 
/jMS 14444 

/AC = 774445 
/CLFtP ERROR TARLE 



/FRROR. (14444 OR 04444) NOT 
/07775 OR 17775 



/ERROR. J"S FROM 07773 TO 15555 
/OR FROM 17773 TO 05555 



/JMP TO RJMS75 
/JMS 15555 

/AC * 775556 
/CLEAR ERROR TABLE 



/FRROR, (15555 OP 05555) NOT 
/0777* OR 1777 4 

/FRROR. JMS FROM 0777? TO 16666 
/OR 1777? TO 0ft66ft 



•EJECT 



A [va 



a r, F 71 



i 3 5 


7 7 7 a 4 




I.FM 




0<=351 


744H00 




cli 




04 352 


204556 




I. AC 


P jSM76 


4 3 5 3 


5 66 6 7 




nut: 


1 6667 


-'354 


20455 7 




I. AT 


RS"76 


1-1355 


4 7 7 7'' 




DAP 


07772 


01356 


047707 




rur 


JSM76 


04357 


776667 




i.4i-< 


1 6667 


9ii 36(5 


60777? 




JMP 


07?72 


04361 


147707 


RJMS 76 


fli»M 


JS '76 


-^i 36 2 


216 6 6 6 




LAC 


1 6666 


714 363 


5 4 4 5 6 




SAC 


K7 ■ 


04364 


741 000 




SKP 




14365 


740040 


F533 


HAL T 


04 366 


207710 




LAC 


JSM77 


04367 


740200 




Si? A 




a 3 7 


740040 


F5 34 


HALT 


0-3371 


707704 




LFM 




04372 


744000 




C.LL 




0-1373 


700004 




CLOF 


04374 


700002 




!0F 




04 375 


204561 




LAC 


RJSM77 


4 3 7 6 


4 




run 


0000 


J 3 7 7 


204562 




LAC 


RSM77 


0/. 4 00 


047771 




OAC 


07771 


4 4 01 


0477|0 




OAC 


JSM77 


04402 


760000 




LAW 


0. 


4 4 3 


607771 




JMP 


07771 


04404 


147710 


RJMS 7 7 


Oi?M 


JSM77 


04405 


21 7777 




LAC 


17 7 7 7 


04406 


544563 




SAP 


K7? 


04407 


741 000 




SKP 




4 410 


740040 


F5 35 


HAL 


r 


04411 


750004 




LAS 




04412 


740010 




RAl 




04413 


7401 00 




S^A 




04414 


700042 




ION 




04415 


507556 




A MO 


K2 IK 


04416 


7 4 12 00 




SNA 




H 4 417 


1066^4 




JMS 


SETCLK 


04420 


207711 




LAC 


JS252 


04421 


740200 




SZA 




4 4 2? 


7 4 4 


F536 


HALT 



/jMP TO RjmS76 



/JMS 16666 

/AC = 776667 
/CLEAR ERROR TABLE 



/ERROR, (16666 OR 06666) NOT 
/07773 OR 17773 



/FRROR.JMS FROM 07771 TO 17777 
/OR 1 7771 TO 07777 



/P! OFF FOR THIS TFST 

/JMP TO RJMS77 

/JMS 17777 



/AC = 760000 
/CLEAR ERROR TABLE 



/PRROR (17777 OR 07777) NOT 
/0777? OR 17772 



/PI RACK ON 

/CHECK ACS 5 

/CLOCK SACK ON 



/ERROR. JMS FROM 12525 yO 15252 
/OR FROM 02525 TO 05252 



•EJECT 



<ASE*9 
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04423 


74400? 




CLE !CMI 


0M?4 


204^64 




LAC RJSM25 


0M?5 


055253 




DAC 15?53 


044?6 


204565 




LAC. RS«?5 


044?7 


052^25 




DAC 12^25 


044^0 


047711 




[1AC JS J 52 


04431 


775253 




LAW 15?53 


0^432 


61252^ 




JMP 1?t?5 


04433 


147711 


R J H S 1 4 


n?* JS>52 


04434 


215252 




LAC 15?52 


5)4435 


544566 




SAD K4?6 


04436 


741000 




SKP 


4 4 3 7 


7 4 00 4 » 


E537 


HALT 


04440 


20771? 




LAf, JS425 


04441 


740200 




S2* 


04442 


740040 


F538 


HALT 


04443 


7 4 4 2 




CLE !CM1. 


04444 


204567 




LAC RJSM52 


04445 


052526 




DAC 12526 


04446 


204570 




LAC RS^5? 


04447 


05525? 




OAC 15252 


04450 


04771? 




DAC JS5?5 


0445! 


772526 




EAw 12526 


04452 


615252 




JMP 15252 


04453 


147712 


RJMS15 


OZM JS r >25 


4 45 4 


212^25 




LAC 12^25 


04455 


54457? 




SAM K4'5 


04456 


741000 




SKP 


04457 


740040 


E539 


HALT 



/LINK = 1 



/JMP TO RJMS14 



/POP-9 BASIC EXERCISER 
/TEST JMS SERIES 



/JMS 15252 

/AC : 775253 

/CLEAR ERROR TABLE 

/412S26 OR 402526 

/ERROR. (15252 OR 0525?) NOT 
/41252ft OR 40252 6 

/ERROR. JMS EROM 15252 T n 12525 
/OR 05252 TO 0?525 
/LINK = i 

/RJMP TO RJMS15 

/JMS 12525 

/AC = 772526 

/CLEAR ERROR TABLE 

/415253 OR 405253 

/ERROR. (12525 OR 02525) NOT 
/415753 OR 405253 
TAPE 5 



04460 


207713 




LAC JSSS 


04461 


740200 




SZA 


04462 


740040 


E540 
/ 


HALT 


044 6 3 


7^4002 


CLL!CM! 


04464 


104465 


JS1 


JMS .+1 


04 465 


740040 


F541 


HALT 


04466 


104467 


JS? 


JMS .+1 


04467 


7 4 00 4 


F542 


HAI T 


04470 


104471 


JS3 


JMS .+1 


04471 


740040 


F 5 4 3 


HALT 


04472 


707704 




LEM 


04473 


744000 




CLL 


04474 


104475 


JS4 


JMS . +1 


04475 


740040 


F54 4 


HALT 


04476 


14 7 713 


RJMSS 


DZM JSSS 


?>4 4 77 


204573 




LAC KJS1 


4 50 


347553 




T A K 4 K 


04501 


740001 




CMA 


04502 


344465 




TAD JSl+1 



/ERROR. JMS SERIES FAILED 

/LINK = 1 

/PRROR. JMS SERIES 

/FRROR. JMS SERIFS 

/ERROR. JMS SFRIES 



/rRROR. JMS SERIFS 
/CLEAR ERROR TABLE 
/TEST JS1 , LINK = 1 



-a F v 9 



(9 P A G F 


73 


511503 


740001 


3-1504 


7 4 2 


•a-- 505 


7 4 4 


< : 5 6 


20,4574 


31507 


34755< 


1 5 1 


740001 


■/ 1 5 1 1 


344467 


01512 


740001 


0151 3 


740200 


01514 


740040 


0151 5 


204575 


1 5 1 6 


347553 


0151 7 


740001 


01520 


3 4 4 4 71 


04521 


740001 


01522 


7 4 2 


04523 


740040 


04524 


204576 


01525 


740001 


01526 


344475 


01527 


740001 


''1530 


740200 


01531. 


740040 


04532 


447633 


01533 


604221 


'115 3 4 


106102 


01535 


1061 26 


01536 


604577 



E545 



F546 



F547 



F548 
/ 



2 

K 4 K 



CMA 

sza 

HAI T 

LAC K.J 

TAD 

CMA 

TAD JS'J + 1 

CMA 

S2A 

HALT 

LAC KJS3 

TAf) K400K 

CMS 

TAP JSX + 1 

CMA 

SZA 

HAI T 

I AC KJS4 

CMA 

TAP J S 1 + 1 

CMA 

SZA 

HALT 

IS? W0WK3 
JMP TSjMS 
JmS GFnRAn 
JMS CK'^JO 
JMP TSXCT 
.EJECT 



/ERROR. JSl+1 
/TEST JS2, LINN = 1 



/ERROR. JS? + 1 
/TEST JS3, LINK = 1 



/ERROR. JS3+1 

/TEST JS4, EXT = 0, LINK 



/ERROR. JS4+1 

/CHECK DONE LOOPING 
/LOOP 

/GET no. TOR NEXT LOOP 

/TEST XCT 



<AS£y9 
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/CONSTANTS FOR JMS . 


04537 


604234 


/ 

RJSH71 


JMP RJ.1S71 


04540 


1111 11 


RS^71 


JMS 11.111 


04541 


010000 


K 1 - ■ 


1 0000 


0*542 


604255 


RJSM72 


JMP RJ'S7? 


0^543 


11222? 


W S M 7 ■■> 


JMS 1??22 


04544 


007777 


K77 


07777 


0*545 


604276 


RJSM73 


JMP RJMS73 


04546 


113333 


"SM7 3 


JMS 13333 


04547 


007776 


K76 


07776 


04550 


604317 


RJSM74 


JMP RJHS74 


04551 


114444 


RSH7-1 


JMS 14444 


04552 


007775 


K 7S 


07775 


04553 


604340 


RJSM75 


JMP RJMS75 


04554 


115555 


RSM75 


JMS 15555 


0'555 


007774 


K74 


07774 


04556 


604361 


RJSM76 


JMP RJMS76 


04557 


116666 


RSM76 


JMS 16666 


04560 


007773 


K73 


07773 


04561 


604404 


RJSM77 


JMP RJMS77 


04562 


117777 


RSM77 


JMS 17777 


04563 


00777? 


K72 


07772 


04564 


604433 


RjSM.^5 


JMP RJMS14 


04565 


11525? 


R S M 2 5 


JMS 15?52 


04566 


412526 


K426 


412526 


04567 


60445?! 


RJSM52 


JMP RJMS15 


04570 


112525 


RSM5? 


JMS 12525 


04571 


007771 


K71 


07771 


04572 


415253 


K415 


415253 


04573 


004465 


KJS1 


JS1 + 1 


04574 


004467 


KJS2 


JS2 + 1 


04575 


004471 


KJS3 


JS3 + 1 


04576 


004475 


KJS4 
/ 


JS4 + 1 






.EJECT 



MOOIFIFD WHEN IN HI 4K 



• a r vq 



/TEST XCT 



'A £517 


75400.'^ 


TSXCT 


CLA !CMi !CLl. !CM 


^i600 


404601 




XCT .+1 


?, 601 


740000 




NOP 


^460? 


740400 




SN! 


01603 


7 4 4 


F519 


HA( T 


?/-604 


740001 




CM a 


0*605 


740^00 




SZ* 


"■606 


740040 


F550 


HAI T 






/ 
/TFST 


EXECUTf NOP, AC = 


3' 607 


754000 




CL/. I CLE 


01610 


40461 1 




XCT ,+1 


01611 


740000 




NOP 


^-3 61 2 


741400 




S2I 


1613 


740040 


E551 


HALT 


3-161 4 


740?00 




SZA 


0^615 


740040 


E552 

/ 

/TFST 


HALT 






XCT SKP 


^616 


407ftl6 




XCT KSKP 


0161 7 


740040 


F553 


HAI T 


0i6?0 


750001 




CLAICM4 


046?1 


407617 




XCT KCI A 


016?? 


740P00 




SZA 


016?3 


740040 


f'554 

/ 

/TFST 


HALT 






XCT LAW 


1 6 ? 4 


750000 




CLA 


016?5 


40757? 




XCT K7S 


016?6 


740001 




CMA 


016?7 


740?00 




SZA 


01630 


740040 


F555 


HAI T 






/TEST 


XCT IS? 


0-S631 


75 01 




CLA !CMA 


04632 


057777 




OAC 17777 


01633 


40505? 




XCT XCTlSZ 


01634 


740040 


E556 

/ 

/TEST 


HALT 






XCT TAD 


0i 6 35 


74400? 




CLLICMI 


01636 


777777 




LAW 17777 


01637 


057777 




OAC 17777 


04640 


405054 




XCT xCTTAO 


016 41 


740?00 




SZA 


0164? 


740040 


E557 


HALT 


0^643 


741400 




SZL 


01644 


740040 


F558 


HALT 
.EJECT 



/AC = ONFS, LINK = 
/NOP 



/FRROP; XCT NOP! LINK WAS RESET 



/error; xct nop; ac not ones 

.INK = u 

/AC = 0, LINK - 



/error; xct nop; link was set 

/ERROR; xCT NOP; AC NOT 



/SKIP 

/fRRORi XCT SKP FAILfO 

/AC = ONES 

/CLA 

/ERROR; XCT CLA FAILFD 



/AC = 
/L*W = 17777 
/AC = 

/ERROR; XCT LAW FAILED 

/AC = ONES 

/ISZ 17777 
/ERROR; XCT ISZ FAILED TO SKP 

/LINK = 1 
/AC = ONfS 
/17777=777777 

/TAO Kl 

/ERROR! XCT TAO FAILED, AC NOT 

/ERROR! XcT TAo FAILED LINK 



<AsFX9 
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/TEST XCT RAL, AC = ONFS. LINK : 1 



0<--645 


754003 




CLA !CMA !CLL !CML 


04646 


407640 




XCT XCTRAL 


PfS64 7 


7 4 00 01 




CMA 


04650 


740?00 




S?A 


04651 


740040 


f 559 


HAI T 


04652 


744400 




SNL;CLI 


04653 


740040 


F_ 5 6 

/ 

/TFST 


HALT 






XCT DAC 


04654 


^07566 




LAC K3S 


01655 


405053 




XCT XCTDAC 


01656 


347567 




TAD K4S 


01657 


740001 




CMA 


04660 


740?00 




SZA 


04661 


740040 


f 561 


HALT 



/AC = ONFS. LINK = 1 
/RAL 

/AC = 

/FRRoRS XCT RAL FAILFD AC DRoPpEn A BIT 
/ERROR; XCTRAL FAILED LINK DROPPED 



/AC z 333333 

/OAC 17777 
/AC = 777777 
/AC = 

/FRRORS XCT DAC FAILFD, K3S 
/MOT STORED AT 17777 



.EJECT 



'4 FX9 



' j a r, f 



77 



/TEST xr:T JM'- 
/ 



l"66? 


20 7714 


0*663 


7 4 2 


0-664 


7 4 4 


''••665 


505030 


■/• 666 


047714 


04667 


0511 1 1 


i 6 7 PI 


205031 


04671 


056666 


04672 


205032 


0-673 


0511 12 


A4 67A 


6111 11 


0*675 


147711 


31676 


21 11 11 


0*677 


545033 


0*700 


741 000 


55 a 7 1 


740040 


* 7 2 


20771R 


0-1703 


740200 


0--704 


740040 


0/1705 


205034 


0*706 


047715 


0-5707 


052222 


01710 


205035 


0471 1 


055555 


01712 


205036 


01713 


052223 


0471 4 


61 2222 


01715 


1 47715 


04716 


212222 


04717 


545037 


04720 


741000 


0"7?>l 


740040 


0*722 


207716 


0*723 


740200 


04724 


740040 



f 562 



RXTT1 



E563 



f 564 



PXCT2 



F565 



F566 



LAC 
SI?-' 
HAi T 

I AC 
DAC 
DAC 
LAC 
DAC 
LAC 
DAC 
JMP 
OHM 
LAC 
SAD 
SKP 
HALT 



XC r ll 



XT1 IS 
X C ' 1 1 
11111 
XT. 11 
1 6666 
XTlR 
1111? 
11111 
XCT11 
111 11 
Kl > 



LAC XCT12 

Si>' 

HAI T 



LAC 
fUC 
DAC 
L AC 

oac 

LAC 
OAC 
JMP 
02M 
I AC 
SAO 
SKF 
HALT 



XT12S 

XCT12 

12222 

XTW12 

1 5555 

XT2R 

12223 

12222 

XCT12 

1222? 
K23 



I AC XCT13 

SZA 

HAI. T 

.EJECT 



/ERROR. XCt (16666 R 06666) 
/FROM 11111 OR 01111 
/XCT (16666 OR 06666) 

/OR 01111 

/JMS 11111 OR 01111 

/OR 06666 

/RJMP TO RXCTl 

/OR 01112 

/OR 01111 AND XCT (16666 OR 06666) 

/CLEAR ERROR TABLE 

/OR 01111 



/ERROR. RJMP ADR. NOT m? 
/OR dill? 



/ERROR. XCT (15555 OR 05555) 
/FROM 12222 OR 02222 
/XCT (15555 OR 05555) 



/JMS 1???? OR 02222 
/RJMP TO RXCT2 

/CLEAR ERROR TABLE 



/ERROR. RJMP NOT 12223 
/OR 02223 



/ERROR. XCT (14444 OR 04444) 
/FROM 13333 OR 03333 



'A^F*9 



PAGE 



04725 


205040 


04726 


047716 


047?7 


053333 


04730 


205041 


04731 


054444 


01732 


20504? 


04733 


533 34 


04734 


613333 


04735 


14771ft 


04736 


25 3333 


04737 


545043 


04740 


741000 


04741 


740040 


04 7 42 


207717 


04743 


740200 


0-744 


740040 


04745 


205044 


04746 


047717 


04,74 7 


047776 


04750 


205045 


04751 


057776 


0475? 


?0504A 


04753 


047777 


04 754 


607776 


0*755 


14 7 717 


04756 


?07776 


04757 


544544 


04760 


741000 


04761 


740040 


04762 


207720 


04763 


740200 


04764 


740040 


04765 


205047 


34766 


047720 


a 767 


055252 


04770 


205050 


04771 


052525 


4 7 7 2 


205051 


04773 


055?53 


04774 


61525? 


04775 


147720 


0^776 


21525? 


4 7 7 7 


545435 


0^000 


7 4 ! « 


0^001 


7 4 4 



RXOT ^ 



F567 



E568 



RXCT4 



E569 



E570 



RXCT5 



F571 



XT1 3S 

XCT13 
1 3 3.33 
X T - I 3 
14 144 
XT 'R 
13334 
1 3 3 33 
XCT13 
1 3 333 
K 3 4 



LAC 
OAC 
HAH 
LAC 
DAC 
LAC 
OAC 
JMP 

o?-< 

LAC 

SAI 

SKP 

HALT 

LAC XCTly 

S?4 

HA L T 



LAC X 

OAC X 

run 

I AC X 

OAC 1 

LAC X 

OAC 



.IMP 



T17S 

CT17 

7776 

T«17 

7776 

T-iR 

7777 

7776 

CT17 

7776 

77 



2 m. 
LAC 07 
SAH K; 
SKP 
HALT 

LAC XCT125 

5? A 

HALT 



LAC X 

OAC X 

n A C 1 

LAC X 

OAC 1 

LAC X 

OAC 1 

.IMP 1 

OH w X 

LAC 1 

SAO K 
SKP 
HALT 
.EJF.C 



CT1?S 

CT125 

525? 

CTR12 

2525 

T5R 

5253 

5-; 5 2 

CTi?5 

5 25? 

15253 



/XCT (14444 OR 04444) 

/JMS 13333 OR 03333 
/PJMP TO RxCT3 

/CLFAR ERROR TABLE 

/ERROR. RJMP NOT 13334 OR 03334 



/ERROR. XCT (17776 OR 07776) 
/FROM 07776 OR 17776 
/XCT (17776 OR 07776) 

/OR 17776 

/JMS 07776 OR 17776 

/OR 07776 

/RJMP TO RXCT4 

/OR 17777 

/OR 1 7776 

/CLEAR ERROR TABLE 

/FOR 17776 



/FRROR. RJMP NOT 07777 OR 17777 



/ERROR. XCT (12525 OR «2525) 
/FROM 15252 OR 05252 

/XCT (12525 OR 02525) 
/OR 05252 

/JMS 15252 OR 05252 
/RJMP TO RXCT5 



/CLEAR ERROR TABLE 



/ERROR. RJMP NOT 15253 OR 05253 



-A F V 9 



PAGF 



79 



/ T t S T 
/ 



1*003 
'1' 00 4 
,11.0015 

0*006 
0< 007 
0*010 
* 1 1 
0*012 
0*01 3 
0*01 4 
0*015 
0*01 6 
0*01 7 

0*020 

0*021 
0*022 

0*023 

* ? 4 

0*0?5 

0' 0?6 
* ■> 7 



0*030 

0*031. 

0*032 
0*033 
0*034 
0*035 
2*036 
0*037 
0*040 
0*041 
0*04?. 
0*043 
0*044 
0*045 
0*046 
0*047 
0*050 
0*051 
1*052 
0*053 
'■ 5 4 



754,<0/S 
405004 

4 5 5 
4 * 6 
405007 
4 5010 
4 5 1 1 
40501? 
4 5 013 
4 5014 
4 5 1 * 
74 
740001 
740?00 
740040 
740400 
740040 
4 4 76 3 3 
604577 
10610? 
I06l?6 
60505* 



41 6666 
111111 
604675 
01111? 
415555 
112??? 
604715 
01 2223 
414444 
113333 
604735 
01 3334 
417776 
107776 
60475* 
41?*?* 
115?5? 
60477* 
457777 
057777 
347531 



:T set- [FS 

CLA'CMA !CLL!CMI. 
XCi . + ! J XCT . 



♦1 



E57? 
F573 



XCT 



XC1 



XC1 . 

MOP 

CMA 

S2A 

HAt T 

SNI. 

HAI T 

IS? 
JHP 
.IMP 
.IMS 
JMP 



XCT . +1 ; 



/AC - ONES, LINK = 1 
XCT .+1 



XCT 



XCT . +1 ; XCT . +1 



/ERROR. XCT SERIES FAILED AC NOT ONES 



W0«K3 

TSXCT 

GFWRAN 

CKMO 

TSAUTO 



/ERROR 
/CHECK 
/LOOP 



LINK CHANGED 
DONE LOOPING 

/GET NO FOR NEXT LOOP 

/TEST AUTO-INOEXING 



/ 

/Xr.T CONSTANTS, MODIFIED WHEN IN UPPER "K 
/ 

XT11S XCT 16666 

XTP11 JMS 11111 

XT1R JMP RXCT1 

*12 11112 

XT12S XCT 15555 

XTR1? .IMS 12?2? 

XT?R JMP RXCT? 

K23 12223 

XT13S XCT 14444 

XTR13 .IMS 13333 

XT3R JMP RXCT3 

K34 13334 

XT17S XCT 17776 

XTR17 JMS 07776 

XT4R JMP RXCT4 

XCT1?S XCT 12*25 

XCTR1? JMS 15?52 

XT5R JMP RXCT5 

XCTISH IS? 17777 

XCTDAC OAC 17777 

XCTTAn TAP Kl 
.EJECT 



^F*9 



PAGE 80 







/AUT'l- 


•INDEX 


0'-05 5 


? 2 


/ 

TSAUTO I AC 2/1 


0'-056 


04763* 




DAT AUTNOT 


« t 057 


220020 




I. A P » ? • 


'■ CI 6 


2 7 6 J A 




LAO AUTNOT 


0^061 


5 4 2 




SAD 20 


0^062 


7 410 




SKP 


C >063 


7 4 4 


f 574 


HA|_ T 


0R064 


040020 




DAT 20 


0^065 


200030 




lac 30 


C 066 


047636 




DAT AUTNOT 


0'-067 


220030 




LAC* 3 ■'■ 


0^070 


207636 




LAC AUTNOT 


0^071 


540030 




SAi, 30 


0'-072 


741000 




SKP 


0«073 


740040 


f 575 


HALT 


= 074 


040030 


/ 
/TFST 


DAC 30 






AUTO-INDEX 50 


0P075 


200050 




1 An 50 


= 076 


047636 




4 c AijtNOT 


0'-077 


220050 




L A » =. - 


U 100 


207636 




LAC AUTNOT 


0^101 


540050 




SAD 50 


1 " 102 


741000 




SKP 


0=103 


740040 


F576 


HAl T 


5 1 4 


040050 


/ 

/TEST 


DAC 50 






AUTO-INDEX 110 


0M05 


200110 




LAC 11' 


0^106 


047636 




OAC AUTNOT 


0=107 


2201 10 




LACo 110 


0^110 


207636 




LAC AUTNOT 


K ltl 


5401 10 




SAD U0 


= 112 


741000 




SKP 


C 113 


740040 


F577 


HALT 


= 114 


0401 10 


/ 
/TFST 


OAC 110 






AUTO-INDEX 210 


0^115 


2 ? 1 




LAC 21 ' 


= 116 


047636 




OAC AUTNOT 


= 11 7 


2 20 210 




1 A C » 210 


0'>1?0 


207636 




I AC AUTNOT 


= 121 


54021 




SAT 21 * 


= 122 


7 410 




SKP 


Ci 123 


740040 


F578 


HALT 


= 124 


4 210 




DAC 21 '■ 
.EJECT 



/TEST AUTO-INOFX 2.0 

/STOPF (20) at AUTNOT 
/FALSE AUTO-INDEX 20 

/COMPARE (AUTNOT) *IITH (20) 

/pRRORi (20) AUTO-INOE/ED 

/RESTORE (20) 

/TFST AUTO-INDEX (30) 

/STORE (30) AT AUTNOT 
/FALSF AUTO INDEX ^0 

/COMPARf (AUTNOT) WITH 830) 

/ERROR; (30) AUTO-INDEXED 
/RESTORE 30 



/STORE (50) AT AUTNOT 
/FALSE AUTO-INDEX 50 

/COMPARE (AUTNOT) WITH (=0) 

/FRROR; (50) AUTO-INDFXEP 
/RESTORE 50 



/STORE (110) AT AUTNOT 
/FALSE AUTO INDEX 110 

/COMPARE (AUTNOT) WITH (110) 

/ERROR! (110) AUTO-INQFXPD 
/RESTORE 110 



/STORE <2i'M AT AUTNOT 
/FAL^F AUTO-INDEx 21* 

/OC"PAPE (AUTNOT) v I T H (21*> 

/ERROR! (210) AUTO-P-'JOEXFD 
/RESTORE 210 



p a r, f: 







/TEST 


AiiTO-IM)FX 410 


" 1 25 


205]41>' 




I AC 41 


« H 1 ? 6 


04 76 3ft 




OAT AUTNOT 


" l?7 


22.14 10 




I.AC* 4i0 


/1 . 13 


2 7 6 3ft 




I.AC. All T NOT 


"■'=131 


6 4 4 1 




SAf! 4 1 1 


0M.3? 


741 0fl0 




SKP 


*M33 


740040 


F579 


HAI T 


0^134 


040410 


/ 
/TEST 


OAC 41 '• 






AUTO-INDEX 1010 


0^135 


201 010 




LAC 1010 


5 1 3 6 


047636 




DAC AlJTMOT 


c 1 3 7 


2?101« 




LAC* 1-!1« 


0M40 


207636 




LAC AUTNOT 


51^141 


5 41010 




SAd 1010 


■^.14? 


741000 




SKP 


0^143 


740040 


F580 


MALT 


0c,144 


41010 


/ 
/TEST 


DAC 1010 






AUTO-INDEX 20l0 


0^145 


202010 




LAC 2010 


C 146 


047636 




OAC AUTMOT 


0M4 7 


222010 




LAC* 2010 


0M 50 


207636 




LAC AUTNOT 


^■-151 


54 2010 




SAC 2010 


/1C1S2 


741000 




SKP 


05153 


740040 


f581 


HALT 


M5154 


042010 


/ 
/TEST 


OAC ?01<3 






AUTO-INDEX 401H 


0K| 155 


204010 




LAC 4010 


05156 


047636 




OAC AljTNOT 


05^57 


22401.0 




LAC* 40 10 


0' 160 


207636 




LAC AUTNOT 


{^161 


544010 




SAO 4010 


0^162 


741000 




SKP 


05J.63 


740040 


E5B2 


HAI T 


05164 


044010 


/ 


nAC 4010 


fl^l65 


447633 


IS? W0PK3 


C 166 


6 50 55 




JMP TS^UTO 


M 6 7 


10610? 




JMc GENRAN 


^. 1 7 


106126 




JM<- C K <■■! 

.EJECT 



/STOPE (41«) AT AUTNOT 
/FALSE AUTOINOEX 4^, 

/COMPARE (AUTNOT) WITH (410) 

/FRRORI (410) AUT-INOEXED 
/RESTORE 410 



/STORE (1010) AT AUTNOT 
/FALSE AUTO-INCiEX 1010 

/COMPARE (AUTNOT) WITH (1010) 

/fRROR; (101«) AUT-INQEXEO 
/rEstOrE 1010 



/STORE (2010) AT AUTNOT 
/FALSE AUTO INDEX 2010 

/COMPARE (AUTNOT) WITH (2010) 

/FRROR! (2010) AUTO-INDEXED 
/RESTORE 201 



/STORE (4010) AT AUTNOT 
/FALSE AUTO INDEX 40t0 

/COMPARE (AUTNOT) WITH (4010) 

/ERROR! (4010) AUTO-INDEXED 
/RESTORE 401fl 

/CHFOK DONE LOOPING 
/LOOP 
/GET NO. FOR NEXT LOOP 



>*>e*Q 



PAGE 8? 







/TEST 


LAC INOIRECT 


0^171 


204544 


/ 

L A I -i 


LAC K7> 


0*172 


057777 




DAC 17?77 


0^173 


?076?6 




LAC M 4 K 


0^174 


047777 




nAC 07/77 


05175 


237777 




I AC. 1 7 77 7 


0^176 


347553 




TAO K4 MIK 


0'>177 


740001 




CMA 


r -200 


740200 




S2A 


£,I i? () 'l 


740040 


F5«4 
/ 


HALT 


0<,2«2 


204547 


LAC K7„ 


05203 


056666 




OAC 16666 


0*204 


207625 




LAC M 4 -•< K 


0«=<205 


047776 




OAC 07776 


0^206 


236666 




LAC* 16666 


0<=?07 


34755? 




TAO K4'"K 


05210 


740001 




CHA 


0^211 


740200 




S2A 


0^212 


740040 


E5S5 
/ 


HALT 


0^213 


20455? 


I.AC K7- 


0^214 


055555 




DAC 15555 


0^215 


207654 




LAC M4* 


C 216 


047775 




OAC 07775 


C 217 


235555 




LAC* 15555 


0^220 


347547 




TAD K4i< 


05221 


740001 




CMA 


0C222 


740?00 




Sit 


05223 


740040 


E586 
/ 


HALT 


0' 224 


204555 


LAC K7'1 


0^225 


054444 




OAC 14444 


0^226 


207623 




LAC M 4 


0^227 


047774 




OAC 07774 


0^230 


234 4 4 4 




LAC* 14 444 


0^231 


347544 




TAO K400 


0^232 


740001 




CMS 


0^233 


740?00 




Sft. 


C 234 


740040 


F587 


HALT 


0> 23 1? 


20 4 5 6;' 




t AC K 7 < 


05 236 


053333 




nAC 13333 


0^237 


70762? 




1 AC M4"> 


01-2 4 


4 7 7 7 3 




OAT 0777 3 


r - 2 4 1 


233333 




I AC* i <333 


0^242 


34754? 




TAO K4 ! 


05243 


740001 




CMA 


5244 


7 4 ? 




S?A 


0^245 


74 4 


F588 


HAL T 
.EJECT 



"7777 OR 17777 



/{\nn oh mm) - 
/Mini 

/OR 17777 
/OR 07777 
/AC = 777777 



/ERROR. LAC* 17777 OR 07777 EAILEO 



/(16666 OR 06666) = 07776 OR 17776 
/737777 

/AC = 737777 
/AC = 777777 



/ERROR, LAC* 16666 OR 06666 FAILED 



/(15555 OR 05555) = 07775 OR 17775 
/AC = 773777 

/AC = 773777 
/AC = 777777 



/ERROR. LAC* 15555 OR 05555 EAILEO 



/(14444 OR 04444) = 07774 OR 17774 
/AC = 777377 

/AC = 777377 
/AC = 777777 



/ERROR. LAC* 14444 OR 04444 FAILED 



/( 133.33 OR 03333) = 07773 1R 17773 
/AC r 777737 

/AC = 777737 
/AC = 77777 



/ERROR. LAC* 13333 OR 03333 FAILED 



■ A F vQ 



-age: 



< ( -?46 


? 4 5 6 3 




LAC K7 • 


/■-?47 


5 7 7 ? 7 




OAF 12?2? 


"'?SB 


??7ft?l 




1 4F M4 


^251 


04777? 




f) A F 7 7 7? 


0'.?5? 


7327 77 




! ac» 1 ;222 


3^253 


34 75.13 




TAP K4 


>~ ? ■; 4 


740301 




CM A 


0' 255 


740P0C1 




S2* 


l ?56 


740040 


F589 
/ 


HALT 


0< 257 


904^71 


1. AT K 71 


0-260 


! ?5 5 1 1 11 




OAF 11111 


0*261 


?076?0 




LAC H1 


0"- : 262 


047771 




OAF 07771 


0^263 


?31U1 




1 . A f : » mil 


1- 2 6 4 


347531 




TAIl Kl 


0^265 


740001 




FMA 


C ?66 


740P00 




S?A 


fl'-?A7 


74004H 


F590 
/ 


HALT 


0*270 


?05'»?7 


LAF !NK5? 


0*27l 


05525? 




DAT 15?5? 


* ? 7 2 


207605 




LAF KlH 


0^273 


05?525 




OAF 12525 


0c,274 


?3525? 




I. AC, 15252 


0*275 


3 4 7 ft 4 




TAD K010 


?f~?76 


740001 




CMA 


0*277 


740?00 




S2A 


0* 300 


740040 


E59i 
/ 


HA[ T 


M^3P)1 


447633 


IS? W0RK3 


0*.302 


6051 71 




JMP LAF IN 


0*303 


10610? 




JMS GENRAN 


MKJ04 


1061 26 




JMS CKiv'O 
.FJECT 



= 07772 HR 17772 



/(1222? OR 02222) 
/AC r 777773 

/AC r 777773 
/AC = 777777 



/ERROR. LAC* 12222 OR 02222 FAILED 



07771 OR 17771 



/(111 11 OR 01111) 
/AC = 777776 

/AC = 777776 
/AC = 777777 



/ERROR. LAC* mil OR 01111 FAIIFD 



/(15252 OR 05252) = 02525 OR 12525 
/AC = 525252 

/AC = 525252 
/AC = 777777 



/ERROR. LAC* 15252 OR 05252 FAILED 

/CHECK DONE LOOPING 

/LOOP 

/GET NO. FOR NEXT LOOP 



SA<EV9 



PAp,E 84 







/TEST XCT 


JMS INDIRECT 


0^305 


74 4000 


/ 

XTJMSI 


CLL 


0^306 


7 5 




CL» 


05307 


547721 




SAD JST77 


0*310 


741000 




SKP 


0531 1 


740040 


E592 
/ 


HALT 


C 312 


206060 


I.AC KI7776 


05313 


047777 




nAH 07777 


05314 


205430 




LAC JMSIl 


05315 


047721 




OAC JST77 


05316 


055252 




OAC 15252 


0531 7 


205431 




LAC RJMIi 


C 320 


057777 




OAC 17777 


053?i 


415252 




XCT 15?52 


05322 


741000 




SKP 


05323 


147721 


RJSI1 


n?M JST77 


053?4 


217776 




LAC 17776 


053?5 


54543? 




SAO RJSllX 


0^326 


751000 




CLA1SKP 


0^327 


740040 


E59 3 

/ 
/ 

/TtST JMS 
/ 


HALT 






INDIRECT 


05330 


744000 


CLL 


05331 


750000 




CLA 


05332 


5477?? 




SAD JST66 


05333 


741000 




SKP 


05334 


740040 


F594 
/ 


HALT 


0^335 


206075 


LAC K11111 


05336 


056666 




DAC 16666 


05337 


205433 




LAC JSI66 


05340 


04772? 




OAC JST66 


05341 


055252 




r>AC 15?52 


05342 


205434 




LAc RJMI2 


0*343 


0511 1? 




OAC 11112 /OR 


0*344 


61 5?5? 




.IMP 15252 


0*345 


74 1 000 




SKP 


0*346 


1477?? 


PJSI ' 


n?M JST66 


0*347 


211111 




LAC 11111 


0*350 


545435 




SAD K1S253 


0*351 


751000 




CLA !SK J 


0*352 


740040 


E595 


HALT 



/ERROR. JMS DEST'B ERROR 

/OIRFCT ADDRESS 

/JMSo 07777 OR 17777 
/FRROR TABLE 

/JMP PJSI1 

/XCT TEST 

/RJSHX = RJSIl-1 

/FRROR (17776 OR 07776) NOT 
/TO RJSI1-1 



>■ 1112 



/ERROR. JMS DEST'N ERROR 

/DIRECT ADR. lllil OR 01111 

/OR 06666 

/JMS» 16666 OR 06666 

/JMS» 16666 OR 06666 AT 15252 
/OR 05?52 
/JMP RJSI2 

/OR 05252 

/CLEAR ERROR TABLE 



/ERROR. RJMP AOR. (11111 OR 01111) 
/NOT 15253 OR 05253 



.EJECT 



.A FV9 



PAGF 8 "5 



0M53 


744000 




CLL 


^c.3154 


750 




rri. a 


^•-355 


547793 




SAD JST55 


[; 35 6 


741 000 




SKP 


0K357 


740040 


F596 


HAl T 


-; c: 36 


90 60 7 3 




I. AC K 19222 


!^3ftl 


055555 




OAC 15555 - 


5 3 6 2 


905436 




LAC JSI55 


0*363 


047793 




DAC JST55 


H 3 6 4 


055259 




OAC 15952 


0^365 


905437 




LAC RJ«I3 


0*366 


059923 




OAC 12223 


0*367 


61525? 




JMP 15952 


C 370 


741 000 




SKP 


M ^ 3 7 1 


147793 


RJSI <, 


nZM JST55 


0' 372 


?1???p 




LAC 12222 


0^373 


•54543S 




SAP K15253 


0*374 


751000 




CLA'SKP 


0*375 


740040 


F597 


HALT 


0*376 


744000 




CLL 


0*377 


750000 




CLA 


0^400 


547794 




SAP JST44 


0*401 


741000 




SKP 


0M02 


740040 


£598 


HALT 


pl c '403 


206071 


/ 


LAC K13333 


0*404 


054444 




DAC 14444 


0*405 


205440 




1 AC JSI44 


0*406 


047724 




OAC JST44 


0*407 


055252 




DAC 15952 


0*41 (1 


205441 




LAC RJMI4 


0*411 


053334 




OAC 13334 


0*412 


615252 




JMP 15252 


0*413 


741000 




SKP 


0*414 


147724 


RJSI4 


OZM JST44 


0*415 


213333 




LAC 13333 


0>~41 6 


545435 




SAf) K1S253 


0*41 7 


751000 




CLA'SKP 


0*42& 


740040 


F599 


HALT 


0<S421 


447633 




IS? W0RK3 


0*422 


605305 




JMP XTJMSI 


0*423 


106102 




JMS gEMRAN 


R 4 2 4 


106126 




JMS CKNO 


*. 4 9 5 


700004 




CLOF 


r 4 26 


605442 




JMP XTXCT 
.EJECT 



/FRROR. JMS OEST'.N ERROR 
/OIRPCT AOR. 12222 OP 02222 

/JMS» 15555 OR 05555 

/JMS» 15555 OR 05555 AT 
/15252 OR 05252 
/JMP RJSI3 
/OR 02223 
/OR 05252 

/CLEAR ERROR TABLE 
/OR 02222 



/ERROR. RJMP ADR. (12222 OR 02222) 
/NOT 15253 OR 05253 



/ERROR. JMS OEST'N ERROR 

/OIRFCT ADR. 13333 OR 03333 

/OR 04444 

/JMSe 14444 OR 04444 

/OR 05252 

/OR 03334 
/OR 05252 

/CLEAR ERROR TABLE 
/OR 03333 



/ERROR. RJMP ADR (13333 OR 03333) 

/NOT 15253 OR 05253 

/CHECK DONE LOOPING 

/[ OOP 

/ G ET NO. FOR NEXT LOOP 



/TEST XCT INOIRECTS 



(A-FX9 



PAGE B6 



ft = 4 2 7 
0=430 
= 431 
0H432 
= 433 
05434 
0=.435 
05436 
= 437 
05440 
05441 



05442 

05443 
05444 
= 445 
= 446 
= 447 
= 450 
= 451 
05452 
05453 
05454 



0t455 
05456 
05457 
05460 
= 461 
05462 



01? = ?=. 
127777 
605 32 3 
0053?? 
136>i66 
605346 
015753 
135555 
605371 
134444 
605414 



70000? 

?07530 
057777 
205516 
040000 
777777 
052525 
437777 
212525 
740P00 
740040 



207530 
057777 
777777 
040000 
477777 
740040 



/C 
/U 
/ 

IN 
JM 
RJ 
RJ 
JS 
RJ 

Kl 

JS 

'■■J 

JS 

/p 

/T 

/ 

XT 



ONSTaNTS FOR 
HEM IN UPPFR 



LaC«i 
4'. 



XCT JMS» MODIFIED 



K5? 12=25 

Sit JMS» 7777 

Mil JMP RJ' ; I1 

S11X RJSI1-1 

166 J MS* 16 666 

MI? JMP RjSi2 

= 253 15253 

I 55 jMS» 1.5555 

MI3 JMP Rj'^3 

,44 jmS» 14444 

M[ 4 JMP RjS|4 
Dp-9 BASIC EXF-^CISFR 
EST x^T INDIRECT 

XCT I OF 

LAC K0 

D A C 17 7 77 

LAC XCTD2M 

nAC 

LAW 17777 
DAC 125 25 
XCT* 17777 
I AC 12525 
Sl> 
F600 HALT 



TAPF 6 



/PI OFF FOR XCT« TO USE 
/LOCATION 

/OR 07777 

/0?M 12525 OR 02525 

/(12525 OR 02525) = 777777 
/OR 07777 
/OR 02525 

/FRROR. XCT« A Oi?M FAILED 
/(12525 OR 02525) NOT 777777 



/ 

/TEST IS? INDIRECT. PI IS OFF 
/ 

LAC K0 

DAC 17777 

LAW 17 777 

DAC 

IS?" 17777 
F601 HALT 

.EJECT 



/OR 07777 

/(0) = 777777 

/ERROR I S2* FAILED TO SKIP/ 



.A -F*9 



CAGE 8 7 







/TF'ST 


XCT« ANC 


)» PI I 


0; 463 


207*30 


/ 


I AC 


K0 


SH-4A4 


057777 




OAC 


1 7777 


/ r -465 


207531 




LAC 


Kl 


^466 


05777ft 




OAf 


17776 


5 4 6 7 


205517 




LAC 


ANilI 


'- 4 7 P! 


040000 




nAc 


V 


0^471 


20760? 




I.AC 


K?'->25 


•= 4 7 2 


040001 




nic 


1 


0t>473 


750001 




CLA 


CM4 


•- 4 7 4 


4 3 7 7 7 7 




XCT» 17777 


C >47 I 5 


54760? 




SAO 


K?S?5 


0S476 


741 000 




SKP 




0^477 


740040 


E602 


HALT 


0C.500 


447633 




IS? 


W0PK3 


0^501 


60544? 




JMP 


XTXCT 


0^502 


1061 0? 




JMS 


CEMRAN 


0"-503 


106126 




JMS 


CKNO 


0^504 


207616 




LAC 


KSKP 


C 505 


040001 




DAC 


1 


0^506 


750004 




LAS 




0S507 


740010 




RAL 




0*51 


7401 00 




SMA 




C 511 


70004? 




ION 




0*51 2 


507556 




AND 


K20K 


0*51 3 


74l?00 




SNA 




0*514 


1 06604 




JMS 


SETCLK 


0S515 


605520 




JMP 


AUTOIN 








.EJECT 



OFF 



/OR 07777. INDIRECT ADR FOR XCT» 
/DIRFCT ADR. FOR AND* 
/OR 07776 

/AND« 17776 OR 07776 

/(l) = 2"525 
/AC = ONFS 
/OR 07777 



/FRROR. XCT* 17777 OR 07777 

/FOLI OWED RY AND* 1777* 

/OR 07776 FAILED 

/CHECK DONE LOOPING 

/LOOP 

/GET NO. FOR NEXT LOOP 



/RESTORE LOC 1 



/PI RACK ON 
/TEST ACS5 



/CLOCK BACK ON 

/TEST INDEX REGISTFRS 



<A>E*9 
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CONSTANTS FOR PRECEDING LOOPS. MODIFIED WHEN IN UPPFR 4K 



0*51 6 
0*517 



0*520 

0*521 

0*523 
0*524 
0*525 
0*526 

0*530 
0*531 
0*532 

0*533 
0*534 
0*535 
0*536 
0*537 
0*540 
0*541 

05542 
06543 
0*544 
05545 

0*546 
05547 
0*550 
05551 
0*552 
05553 
0*554 
?,c>5*5 
0^556 
0*557 
0*560 



1*?*?* 
53777ft 



206060 
040010 
207564 
057777 
260010 
740200 
740040 

200010 
546061 
741000 
740040 

20606? 
040010 
207565 
056666 
260010 
740200 
740040 

200010 
546063 
741000 
740040 

206064 
040010 
207566 
055555 
260010 
740200 
740040 
20 010 
546065 
741000 
740040 



/CONST 


ANIS HIK f-itttlHMj L 


/ 




X C T / M 


H2M 12"?5 


A NO! 


AND* 17776 


/ 




/ 




/TEST 


AUTO-INDEX (XOR* 10) 


/ 




AUT0IN 


LAO K 1 ; 7 7 6 




OAO H 




LAO K 1 -> 




nAO 1.7/77 




XOR» 1 ■ 




S2A 


F603 


HALT 




LAC 10 




SAO K17777 




SKP 


E604 


HALT 


/ 






LAO K16665 




nAO 10 




LAC K?S 




OAC 16666 




XOR* 1 -' 




SZA 


F605 


HAl T 




LAC 10 




SAO K1A666 




SKP 


F606 


HALT 


/ 






LAC K15554 




OAC 10 




LAC KJS 




DAO 15555 




XOR* 1 ' 




Si?A 


F607 


HALT 




LAO 10 




SAO K1S555 




SKP 


E608 


HA( T 




.EJECT 



/<10) = 17776 OR 07776 
/AC = 11111 
/OR (17777 

/FRROR. XOR* 10 FAILED 
/AC MOT 111111 



/ERROR. (10) NOT INCREMENTFO-H 



/(10) = 16665 OT 06665 
/AC r 22222 
/OR 06666 



/ERROR. XOR* 10 FAILED 
/AC NOT 22222 



/ERROR. (10) NOT INCREMENTED*! 



/(10) = 15554 OR 05554 
/AC = 333333 



/ERROR. XOR* 10 FAILED. AC NOT 333333 



/frrop. (10) not incremented +i 



i A -FV Q 



!' 4GF 



F9 



9"i6t 


206066 




lac: K 1 4 4 4 3 


p -562 


040011' 




DAC 10 


"l'-563 


507467 




l a r. k 4 ; 


CI >- -5 6 4 


054444 




DAT. 14 4 4 4 


= 565 


26 0010 




XOR» 1 1 


■?&566 


740200 




S?« 


it = 5 A 7 


740040 


F609 


HALT 


01-570 


20 010 




LAC 10 


«^57l 


•546067 




SAM K14444 


0^572 


7 410 




SKP 


= 573 


740040 


F610 


HALT 


0^574 


206070 




I.AC K11332 


0=575 


040010 




OAC 10 


= 576 


207570 




LAC K5S 


= 577 


053333 




DAC 13333 


Pit. 6 (» a 


260010 




xOR* 1 1 


= 601 


740P00 




S2A 


r. 6 2 


740040 


F611 


HALT 


ft' 603 


200010 




LAC 10 


PS ^6P)4 


546071 




SAD K13333 


SI ■=. 6 B 5 


741000 




SKP 


= 606 


7 4 4 


F612 


HA|. T 


it' 607 


20607? 


/ 


I.AC Kl?22i 


= 610 


040010 




0*0 If! 


0=.61 1 


207571 




LAC K6S 


= 612 


052222 




OAC 12?22 


0=.61 3 


260010 




XOR» 1 "I 


0=.61 4 


740200 




S2A 


= 615 


740040 


F613 


HAl T 


= 61 6 


200010 




LAC 10 


0^61 7 


546073 




SAD Kl?222 


= 620 


741000 




SKP 


= 621 


740040 


F 614 


HA, T 


0=>622 


206074 




LAC K11110 


0=.623 


040010 




DAC 10 


= 624 


207572 




LAC K7S 


= 625 


0511 11 




OAC mil 


0^626 


260010 




XORa 1" 


= 627 


740200 




SZA 


0=>630 


740040 


F615 


HALT 


PI' 631 


200010 




I.AC 10 


= 632 


546075 




sah Kimi 


= 633 


741000 




SKP 


= 634 


740040 


F616 


HA| T 

.EJECT 



/(10) = 14443 OR 04443 
/AC = 444444 



/ERROR. XOR» 10 FAILED AC NOT 444444 



/ERROR. (10) NOT INCREMENTED +1 

/<10> = 13332 OR 03332 
/AC = 55555 



/ERROR. XOR» 10 FAILFD AC NOT 555555 



/FRROR. (10) NOT InCREmEnTED+1 



/(IB) = 12221 OR 02221 
/AC = 666666 



/ERROR. XOR» 10 FAILED. AC NOT 666666 



/ERROR. (10 NOT InCREmENTED+1 

/(10) = 11110 OR 01110 
/AC = 777777 



/ERROR. XOR» 10 FAILED. AC NOT 777777 



/error. (10) not Incremented +i 



iA- : F*9 
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/ T f S T 


IS/» 11 


0^635 


206076 


/ 


LAO K1 -252 


0' 636 


4 011 




nAC 11 


0^637 


20757? 




LAP K7s 


0^640 


055253 




OAT 1 5 i 5 3 


C 641 


4 6 1. 1 




IS?» 11 


1^64? 


740040 


f 61 7 


HALT 


05643 


215?53 




LAT 15>53 


C 644 


740200 




S?* 


05645 


740040 


F618 


HAl T 


0^646 


200011 




LAC 11 


C 647 


■545435 




SAfi K1^253 


05650 


741000 




SKP 


05651 


740040 


F.619 
/ 

/AUTON 


HALT 






-INDEX JMP* 12 


0*652 


207725 


/ 


LAC AUTJMP 


05653 


740200 




SZa 


0*654 


740040 


F620 


HALT 


0"-655 


907650 




LAC JMPAUT 


05656 


047725 




DAC AUTJMP 


05657 


206077 




LAC AUTRFT 


0*660 


5 5 ? 5 3 




DAC 15?53 


05661 


206076 




LAC K15252 


0*662 


040012 




DAC 12 


0*663 


62001? 




JMP* 1? 


05664 


741000 




SKP 


0*665 


147725 


AUTR 


D?M AUTJMP 


0*666 


20001 2 




LAC 12 


0*667 


5454^5 




SAD K15253 


0*670 


741.000 




SKP 


0*671 


740040 


F621 
/ 

/AUTO- 
/ 


HALT 






INDEX (DAC* 13) 


0' 672 


204547 


LAC K7-s 


0*673 


04001 3 




DAC 13 


0*674 


204547 




LAC K7 • 


0- 675 


047777 




DAC 07777 


0-676 


207530 




LAC K 


0*677 


060013 




DAC* H 


0*700 


907777 




LAC 07/77 


0*701 


740200 




SZA 


0*70? 


740040 


F622 


HALT 


0' 703 


200013 




LAC 13 


0*704 


544544 




SAD K77 


0*705 


741 000 




SKP 


0*706 


740040 


F6?3 


HA| T 
.EJECT 



/(ll ) = 15252 OR 05252 

/OR M5253 

/ERROR. IS? FAILED TO SKIP 
/AUTO-1NOEX 11 FAILED 

/ERROR. (15253 OR 05253) NO T 
/IS? PARED 



/ERROR. (11) NOT INCRfMENTEO+l 



/ERROR. JMP* 12 FAILED TO REACH 15253 
/JMP* 12 

/RJMP TO AUTR 



/(i?) = 15252 
/CLEAR ERROR TABLE 

/ERROR. (12) NOT INCREMENTFD+1 

/(13) = 07776 OR 17776 
/(07777) = 07776 

/FRROR. (07777) NOT 0. DAC* 13 FAILED 
/FRROR (13) tgoT InCRFmFNTED + 1 
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/AUTU- 
/ 


IN'OFX (XCT* 14) 


0< 7<AJ 


204571 


LAC K7' 


'■ 7 1 


4 14 




n a c 14 


H'-71 1 


207641 




I A A II 1 C M A 


r 712 


04777? 




ElAC 0777? 


0-713 


760001 




OLA !CMi 


0'--7l 4 


420014 




XC1* 14 


0'=715 


740200 




S2« 


l -716 


740040 


F6?4 


HAl T 


0^71 7 


200014 




LAC 1 4 


0^770 


544563 




SAP K7J 


05721 


741.000 




SKP 


0^7?? 


740040 


F6?5 
/ 

/AUTO- 


HALT 






INDEX (TAD* 15) 


0*,723 


206060 


/ 


LAC K17776 


0^724 


040015 




n*r, 15 


0' 7?5 


207531 




LAC Kl 


057?6 


057777 




OAC 17777 


0t 7?7 


754001 




CLL'CLA !CMA 


0^730 


360015 




TAn» 15 


0^731 


740200 




SHA 


0*73? 


740040 


F626 


HALT 


0^733 


740400 




SNL 


0^734 


740040 


E6?7 


HALT 


K 735 


200015 




LAC 15 


0^736 


546061 




SAC K17777 


05737 


741 000 




SKP 


<-. 7 4 


740040 


E628 


HALT 


PI*- 741 


21 7777 




LAC 17777 


0^742 


547531 




SAn Kl 


c -743 


741000 




SKP 


0R744 


740040 


E6?9 


HAL T 






/ 

/AUTO- 


INnFX (SA0» 16) 


0i,7'»5 


204555 


/ 


LAC Ky4 


05746 


040016 




nAC 16 


05747 


207603 




LAC K5?52 


0^750 


047775 




OAC 07775 


0^751 


560016 




S A n « 1 * 


0*752 


741000 




SKP 


r -753 


740040 


E630 


HAl T 


* 7 <j 4 


207775 




LAC 07775 


05755 


547603 




SAD K5?52 


0*756 


741000 




SKP 


0*>757 


740040 


E631 


HALT 


0*760 


200016 




LAC 16 


05761 


54455? 




sad K75 


05762 


741000 




SKP 


0*763 


740040 


E632 


HA| T 
.EJECT 



/(14) = 07771 
/(0777?) = CMA 

/ERROR. AC NOT (XCT* 14) A CMA 

/ERROR. (14) NOT INCREMENTEO+1 

/(15) = 17776 OR 07776 
/OR 07777 

/ERROR. AC NOT (TAD* 15) 
/ERROR. LINK NOT 1 (TAD. 15) 

/ERROR. (15) NOT INCREMENTEO+1 

/ERROR. (17777 OR 07777) NOT 1 

/(16> = 07774 
/(B7775) = 525? 

/ERROR. SAD SKIPPED (SAD, 16) 
/ERROR. (07775) NOT 5252 
/ERROR. (16) NOT I nCREmEnTEO+1 



A ; F X 9 
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0' 764 


0< 76? 


51' 76ft 


0' 767 


»« 770 


0' 77l 


0<~772 


0^773 


0*774 


0^-775 


0'776 


0*777 


0*000 


0^001 


06002 


06003 


06004 


06005 


06006 


06007 



06010 
06011 
06012 
0601 3 
0601 4 
0601 5 
06016 

06017 
06020 
6 021 
06022 
06023 
6 0?4 



207726. 
744200 
740040 
2061 30 
047773 
204571 
040017 
2076,46 
047726 
120017 
741000 
147726 
207772 
■546101 
741000 
740040 

200017 
■544563 

741000 
740040 



207534 
040010 
207572 
040011 
460010 
740040 
20001 
54753*1 
741000 
740040 
200011 
740200 
740040 



/AllT'l- INDEX < JHS» 17) . 
/ 

I At: AUTJMS 

S2A ! CLI 

E633 HAL T 

LAC AUTRJM 

DAT 07 '73 
LAP K71 
n AC 17 

I AC JM.;AlJT 

DAC AUTJMS 
.IMS, 17 
SKP 
AUTRtl Ml* AUTJMS 
LAC 07772 
SAD AURJMP 
SKP 
HALT 



f 634 



F.6 35 



I AC 17 
SAD K7; 
SKP 
HALT 



/AUTO-INDEX ( IS2* 10) (10> 

/ 

LAC Kl '■ 
OAC 10 
LAC K 7 S 
rue 11 
IS?* 1" 

E636 H »t T 

LAC 10 

SAD K11 

SKP 
F637 HALT 

LAC 11 

S2A 

HA| T 



F638 
/ 

/AOT-i-r 



/FRROR. FRROR TABLF NOT 

/JMP AUTRE1 

/(17) = 07771 

/JMS* 17 IN FRROR TARLF 



/ 



CLFAR error TABLE 



/FRROR. (07772> STORED WRONG 
/<07772) SHOULD = AUTRE1-1 



/FRROR. (17) NOT INCRE^ENTEO+1 
10. 

/(ID = 777777 

/ERROR. ISZ FAILED TO SKIP 



/ 



FRROR. (10) NOT 11 



HEX < IS?* 11) (11 ) 



/ERROR. (11) NOT 

10. 



0*025 
06026 

060?7 

0<-0 30 

6 31 

6 3 2 
06033 



507S34 
4 011 
4 6 011 
20001 1 
547536 
741000 
740040 



f 63 9 



I AC Kl,.' 

nA r 11 
IS?' 11 

i a r. 11 

SAL K 1 ' A 

SKP 

HALT 

.EJECT 



/(11 ) = 10 



/ERROR. IS?* 11 FAILED TO 
/INCREMENT +2 (11) 



TV'J 



p 4 r, f : 
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/AUTO-1 ' 


■HEX (XCT* 15 


JV034 


?04"-,ftl< 1 


/ 


LAC K?< 


06035 


04001 5 




(-) AC 15 


A i- 3 ft 


707644 




I AC LA^AUT 


•i f 3 7 


047774 




DAC 07774 


"i» 40 


707646 




I AC LAWFUL 


6 41 


047776 




I1AC 07775 


0. 04? 


750000 




CLA 


06043 


420016 




XCT* 16 


06044 


740001 




CMA 


6 4 5 


740200 




SZA 


06046 


740040 


F640 


HAL T 


06047 


5 016 




LAC 15 


06050 


54465? 




SAD K7' 


06051 


741 000 




SKP 


06062 


740040 


E64J 


HALT 


0*"0"53 


447633 




IS? W0RK3 


0^064 


605520 




JMP AUTOIN 


06065 


777776 




LAW -3 


06056 


0476J3 




DAC W0UK3 


06067 


606154 




JMP CHKBRD 
.EJECT 



/(15) = 07773 

/(07774J = XCT* 15 

/<07775) = LAW 17777 
/AC = 



/FR?OR. AC NOT ONES 
/LAW 1777 DID NOT OCCUR 



/ERROR. (15) NOT 7775 (XCT* j5> 
/CHFCK DONE LOOPING 
/LOOP 

/BASIC MEMORY CHECKERBOARD 



<A''.F*9 



P A f, F 9 4 







/ C N S T A f 


■JTS FOR AHTO-INOEX INT, . 


HODIFIEn 


1» 0ft0 


01 7 7 7ft 


/ 

« 1 7 7 / ft 


1 777ft 




llfcdlfil 


017 7 7 7 


'17 7,7 


17 7 7 7 




/• PI ft 2 


01 ftftftH 


* 1 ft ft ^ 5 


1 ftftftS 




Ji i a ft 3 


1 ft ft ft ft 


K 1 ft ft '1 ft 


1 ftft6ft 




l? * ft 4 


-51 RS54 


K 1 "--•'?')4 


15S54 




0*0ft5 


■11 S^S^ 


r 1 '■> 5^5 


15S55 




a ft ft 


1 4 4 4 3 


M 4 4 4 3 


14443 




0ft067 


014444 


K 1 4 4 4 4 


14444 




0ft070 


01333? 


K 1 3 3 3 2 


1 333? 




0ft071 


013333 


K13333 


13333 




0ft072 


012221 


K 1 2 2 2 1 


12221 




0f 073 


01 2222 


K12222 


1 222? 




0ft074 


011110 


K 11 1 1 PI 


11110 




0'075 


011111 


(-.11111 


11111 




.1^076 


01 525? 


K1S252 


1525? 




0/,07 7 


ft05ftft5 


AUTRFT 


J M P A U T R 




0ft 100 


605777 


AuTRJM 


JMP AijTREl 




0ftl01 


00577ft 


4URJMP 


AUTRF1-1 
.EJECT 





WHEN IN HI 4K 



page 







/RANDOM 

/ 

GENR-N 


NUMBER GFNFRaT 


'"• 1^2 


C 5) 





•A < 10 3 


2061 ?3 




i ac Ra dfx 


a h 1 4 


5461 ?4 




SAP) FNHTR|. 


■A f 1 5 


741 000 




SKP 


/- 1 6 


6061 16 




J M P RANTAD-1 


^ M 7 


2061 25 




LAC T8I TOP 


■<nm 


4 6123 




DAC RANDEX 


:>f-l1 1 


207654 




LAC RAMCON 


«'11 2 


74401 




CLLiRAI 


0M1 3 


741 4 00 




S2L 


0^114 


347531 




T AO Kl 


«M15 


047654 




DAC RAMCON 


"116 


2261 23 




LAC* RANDEX 


0M 1 7 


3 4 7 6 5 4 


R A N T A n 


TAD RAmCON 


0M20 


6 6123 




DAC* RANDEX 


0M21 


4 4 612 3 




IS2 RAMQFX 


n<-t?2 


626102 


/ 

RANDEX 


JMP« GFNRAN 


< 1 2 3 


00766 s 


RAMTRL+10 


0A124 


007665 


FNPTRL 


RANTRL+10 


M 2 5 


00765^ 


T8LTI1P 

/ 

CKNO 


rANjRL 


0"126 


000000 





0<127 


507607 




AND K37S 


0M 30 


740C501 




CMA 


0M31 


4 7 6 3 3 




nAC W0RK3 


0'132 


626126 


/ 

RANGFN 


JMP* C<NO 


0*133 


000000 





0M34 


2061 23 




LAC RANDEX 


0*135 


5461 24 




SAP FnHTRl 


HMS6 


741 000 




SKP 


If- IS 7 


6061 47 




JMP TAORAN-1 


06 1 40 


2061 2*> 




LAC TRI..TOP 


0M41 


4 6123 




DAC RAX'OEX 


MM4 2 


207654 




LAC RAMCON 


0M4 3 


744010 




CLL !RAL 


M 4 4 


741 100 




S?l 


0* 145 


347S31 




TAP Kl 


0*146 


4 7 6 5 4 




flAC RAMCON 


^147 


226123 




LAC* RANOEX 


0*150 


3 4 76 5 4 


TADRAN 


TAP RAniCON 


0A151 


0661 23 




nAC* RANOEy 


0M52 


7 4 




NOP 


0*153 


6261 33 




JMP* RANGEN 
.EJECT 



/CHECK FOR END OF TARlE 
/ENn 
/GENFRATF RANDOM 

/RESFT INDEX TO FIRST 

/POSITION MODIFIER 

/1 LFFT 

/WAS BIT A 1 

/YES MAKE 17 A 1 

/RFSTORE MODIFIER 

/GET FIRST CONTROL 

/AOD MODIFIER 

/NEW CONTROL i RANDOM 

/STFP POINTER 

/EXIT 



/MAkf 65K OR LESS 

/LOOP COUNTER 
/FXIT 



/CHECK EOR TA8LE EnD 
/END 
/GENFRATF RANDOM 

/RESET INDFX TO FIRST 

/POSITION MODIFIER 
/1 LEFT 

/ W AS BIT A 1 
/MAKE 17 A 1 

/RESTORE MODIFIER 
/GET FIRST CONTROL 

/ADD MOOiFjER 
/NEW CONTROL = RANDOM 

/FXIT 



• A>E*9 



P A G F 9 6 



$( 164 


70000? 


r.HKRwn i of 




0*165 


75000 4 


LAS 




0' 156 


7 4 ;■ 1 


RAI 




* 1 5 7 


7 4 01 


SMA 




v) ^ 1 ft « 


7 4? 


\Q* 




0*161 


777777 


I Ak 


-1 


0*1*>2 


4 7 31ft 


DAT 


HI TSUP 


* 1 ft 3 


2061 65 


LAP 


t + - 1 


0*lft4 


046332 


DAT 


N F >' P A T 


0*165 


2 7 3 


I Af 


KP '-T 


0* 166 


4 7 3 4 


OAC 


MP A T 


0*167 


147631 


n ? "• 


WiWK1 


0*170 


707704 


1. t. •■' 








/ L n a n c h f C k F R 8 o a ~ n 


0*171 


10631? 


/ 

J MS 


ADJUST 


0*172 


207304 


IOaD LAC 


MPaT 


* 1 7 3 


347306 


rue 


PA TWO 


* 1 7 4 


777776 


LAW 


-? 


0* 175 


4 7 313 


DAT 


WC '56 


06176 


777770 


LCNTA LAW 


-1L 


0*177 


047276 


n ac 


WCi 28 


0*200 


777760 


I.CfPT>' I AW 


-2 ' 


0*201 


047275 


D A C 


WC1 6 


0*202 


207306 


LAC 


PA TWO 


0*203 


047305 


DAC 


PAIR 


0*204 


207305 


wCLOOP LAC 


PAtR 


0*205 


74401 


RCL 




0*206 


047305 


DAC 


PATR 


0*207 


751400 


SHL! 


ICLA 


0*21 


740001 


CM A 




0*211 


067277 


mr< 


» LLREG 


0*212 


207277 


LAC 


LLREG 


0*213 


546061 


SAC 


Ki 7777 


0*21 4 


606234 


JMP 


READ 


(1*215 


447?77 


IS? 


LL-'FG 


0*21 6 


447275 


IS? 


WC16 


0*21 7 


606204 


JMP 


WCI OOP 


0*220 


447276 


IS? 


WC1 28 


0*221 


606200 


JMP 


LC-.TR 


0*??2 


20 7 3 4 


LAC 


MPAT 


0* 223 


7440P0 


RCL 




0*224 


7404 00 


SMI 




0*225 


606?30 


JMP 


, + < 


0*226 


4 4 7 313 


IS? 


WC ; 56 


0*227 


6061 76 


JMP 


L C M T A 


0*230 


2 7 3 6 


I AC 


PA TWO 


0*231 


740001 


CMa 




0*232 


047306 


DAC 


PATWD 


0*233 


6061 74 


JMP 


LOaD+2 






.EJECT 



/HHFCK PI INHI«ITFn 
/PI ON 



/-16 DECIMAL 



/TEST FOR A 1 OR 

/STORE WORD 

/DONE LOADING? 
/YES 

/INCR. ADR 
/16 WORDS? 
/MO 



f y9 
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■', 734 


707 304 


.-1 '73 5 


4 7 6 3'' 


.<' 736 


1 0631? 


0< 737 


77777* 


0' 740 


4 7 313 


H/-P4 1 


7 7 7 7 7 


tii 74? 


047776 


iV 74 3 


7 7 6 3? 


1 7 4 4 


047305 


A ? 4 5 


777760 


0' 746 


047775 


0a?47 


777777 


06?50 


047741 


«A?t5t 


707305 


0A?52 


7 4 4 01.0 


0A753 


047305 


0A?54 


751400 


06?55 


740001 


0A?56 


047306 


0*757 


777777 


.'A260 


740P01 


0A2M 


067777 


0*76? 


447741 


0A?63 


606757 


0A?64 


777777 


<**.?65 


547306 


0*266 


741000 


0A?67 


606^40 


0a?70 


707777 


A 2 7 1 


546061 


6 ? 7 2 


606375 


0A?73 


447777 


j|A? 7 4 


44 7 ? 7 5 


0A?75 


606747 


0*776 


447776 


0*777 


606743 


0*300 


707304 


0*301 


744020 


0*302 


740400 


0*303 


606306 


0* 30 4 


447313 


0*305 


606741 


0*306 


707637 


0*307 


740001 


0A310 


04763? 


0*311 


606737 



/RCA'l 

READ 



k C N T .: 



PCM H 



RCLOOP 



RQRTN 



CHF CKERBOA^O 


I AC 


MP.'. T 


DAT 


HIIkK? 


JMc, 


AH HJPT 


I AH 


-7 


OAT 


WC '56 


LAW 


- 1 ■•'■ 


DAT 


WC1 2fi 


LAC 


WORK? 


04C 


PATR 


I AW 


-7 ' 


DAC 


WC1 6 


LAW 


-6 


OAC 


CRI F 


LAC 


PATR 


RCL 




DAC 


PATR 


S?L 


CL^ 


CMA 




DAC 


PATWO 


LAC* LI. REG 


CMA 




DAC* LLREG 


IS? 


CRI.F 


JMP 


. -4 


LAC* L 1 R F. G 


SAO 


PATwn 


SKP 




JMP 


FRROR 


LAC 


LLREG 


SAD 


K17777 


JMP 


NXTST 


IS? 


LLREG 


IS? 


WC1 6 


JMP 


RC| OOP 


IS? 


WC1 28 


JMP 


RCNTB 


LAC 


MPaT 


RCR 




SNL 




JMP 


. + 3 


IS? 


WC756 


JMP 


RCMTA+? 


LAC 


WORK? 


CMA 




OAC 


W0RK2 


JMP 


RCMTA 


.EJECT 



/RFSTORE patt e rn gfn 



/-26 DFCIMAL 



/SAVF FOR COMPARE 



/COMPARE 
/OK 



/DONE READING? 



/YES 

/INCR. ADR 
/16 WORDS? 
/NO. 



.A-f X9 
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{*■ 312 


000000 


ADJUST 





0>>313 


206313 




LAC . 


0' 31 4 


507 c 55 




ANI' Kl 'K 


i! i- 3 1 5 


74^200 




S^A 


0^-316 


ft 6 3 2 2 




JMp DLADJ 


0' 317 


?07tSS<- 




LAC Kl-K 


0f-320 


4 7 2 7 7 




OAC LL-EG 


0> 321 


626312 


/ 

UL«n j 


JMH„ A JUST 


0*322 


?07544 


I A C K4.-U 


6 3? 3 


4 7 2 7 7 




MAC LLJ-TG 


0'324 


626312 


/ 
n xtSt 


JMC* A iJ|jST 


06325 


207631 


LAC w 0i'K1 


0'-326 


247560 




XOP K600K 


0'-327 


741200 




SNA 


06330 


606363 




JMP CKI OOP 


«' 331 


446332 




IS? . + 1 


H'332 


207300 


NiEXPAT 


LAC KPiT 


0' 333 


047304 




OAC MP AT 


0^334 


207631 




LAC WO>'-'Kl 


0' 335 


347557 




TAT) KJ00K 


>M 336 


047631 




OAC W » K 1 


0M37 


6061 71 




JMP LOAO-l 



/SA = 010000 FOR PATTERN 



/SA = 400 FOR PATTFR'i 



.EJECT 



p 4 r, F 



/R/.SIC Ml-MflRY OH; CKERBOAWO FWROR ROUTINE. 



* 340 
■1' 341 

1634? 
'» 344 
'■ <■ 3 4 5 
1' 346 
(.* 347 

.*< 350 
0' 351 
0^.35? 
06 353 
06354 
6 3 "5 5 
.16356 
06.35 7 
1 ' ,36 
1-36 1. 
6 3 6 ? 

0/ 3 ft. 3 
f- 3 ft 4 
6 3 6 "5 

-51' ^6 7 
-16370 
06 371 
0(37? 
6 3 7 3 
6 37 4 

6 3 7 5 

6 376 
6 ,3 7 7 

• 1 6 4 
6 401 
06 40? 
06403 
0a 404 
6 4 5 



'4^6 

6 4 7 
0641 
0641 1 
06 412 
06 4 1.3 
0641 4 
6 4 1 5 
06416 
6 417 



047' 33 
50731 6 

7 4 0? 

7 4 0001 
50731 6 
74 1 ?00 

6 6^70 

7 7 ? 7 7 
7 4 4 
?07306 
740040 
P07633 
7 4 4 
750004 
7 4 01 
4 7 316 
9076.3? 
7 4 4 
606055 

750004 
74?010 
7 4 0010 
741 100 
6061 54 
447633 
6061 54 
70000'' 
7 50 4 
507556 

741 ?00 
606406 
760?07 
107710 
75000 4 
7 4 010 
7411 00 
107?50 
600070 



7 00 0? 
7700?3 
4 7 31? 
906411 
507555 
740?00 
606510 
740001 
04763? 
?0731 7 



F R P n I- 



^ 6i? 
coat a 

BOAT A 

P A T T 

/ 

CKLOOP 



n a r: w o ■ ' k 3 

AMI! uITSUP 

S>* ' 

CMA 

ANfi Hit SUP 

SNA 

JMP H'i"TN 

I AC LL^'FG 

HIT 

I AC PATWn 

HLT 

LAC W0WK3 

HLT 

LAS 

CM.' 

OAC RITSUP 

LAC WO lJ K? 

HLT 

JMP F641+3 

LAS 

RTI 

RAL 

SPA 

JMP CHK8R0 

IS? WORK? 

JMP CH><RRD 

I OF 

LAS 

AnTi kP-'K 



/DISPLAY AnnRESS 
/ooon nATA 

/BAO DATA 
/SUPPRFSS HERE 

/PATTERN CONTROL WORD 
/START OVER 



/LOOP ON MEMORY TEST 
/CHECK OONE LOOPING 
/LOOP 



/CHECK ACS 4 FOR 
/INHIBIT RELOCATION 



SNA 

JMP FNTST 

LAW 907 

JMS TLSSF 

LAS 

RAl 

SPA 

JMS PI NOT 

JMP SFOUEN 
/POP-9 BASIC FXF»CISFR 
/ 

/ROUTINE FOR PROGRAM RELOCATION 
/ 



/RELOCATF 

/BFLI. FOR ONF PASS 



/check e r pi Inhibited 

/INHIPITFD 

/START OVER IN THIS 4K 

TAPF 7 



FNTST 



I OF 

l»» -7755 

OAC WDCNT 

LAC . 

AN0 K10K 

SZA 

JMP MVPK 

CMA 

OAC WORK? 

LAC K7777 



/PI OFF DURING RELOCATION 



/SEE IF IN LO OR HI 4K 
/HI 4K 

/SOURCE ADDRESS 

/OEST'N ADR. TO HI 4K 



9 PAGE 


100 


Si , 4 ? 


04 7A 33 


0*421 


207*3? 


v1^4?? 


4 7 314 


»M?J 


707*33 


•A I 4 ? 4 


4 7 315 


0*425 


4 4 7 3 1. 5 


0*4?6 


1673-15 


, 4 2 7 


44731? 


0*430 


6064P5 


0*431 


207*33 


0*432 


047315 


0*433 


447314 


0*434 


2273i4 


0*435 


047633 


0*436 


507561 


0*437 


247561 


0*440 


740?00 


(^441 


606515 


0*442 


207633 


0*443 


447315 


0*444 


067315 


0*445 


547?74 


0*446 


741000 


0*44 7 


606433 


0*450 


147633 


0*451 


447314 


0*452 


?273l4 


0*453 


447315 


0*454 


067315 


0*455 


547?74 


0*456 


741000 


0*457 


606451 



m o V F 



rfro>- 



M V R T N 



mvcst 



rue 

LAC 

nAC 

LAC 

nAC 

IS? 



wn'--K3 

Will- K? 

m n i/ f s 

W0--K3 
MO'/Fn 

m o >/ f n 
M.ivFn 



is? 

JMP 

LAC 

DAO 

IS? 

L A C o M 

0A0 WO 

A NO 

XOR 

S2A 

JMP 

LAC 

IS? 



wncMT 

, - < 
WO IJ K3 
MOVED 
MOVES 
VES 
K3 
K7.-0K 
K7 10K 



MRINS 
WORKS 
MOVED 
OAC« MOVED 
SAI1 LIMITA 
SKP 

JMP REROM 
OZM W0RK3 
IS? MOVES 
LAC* MOVES 
IS? MOVED 
OAC» MOVFO 
SAO LIMITA 
SKP 

JMP MVCST 
.EJECT 



/CLFAR DFST'N TO 0*S 



/RESTORE OFST'N S.A. 

/SOURCF AOR. 
/SAVF INSTRUCTION 



/ORFRATE INST. IF 
/MEMORY REE 



/STORF IN OPPOSITE 4 K 
/DONE WITH INST. IF FOUAL 
/MOVF CONSTANT TABLES 
/MOVF ANOTHER INST. 



/SOURCE 

/nEST'N 

/OONF MOVING IF EQUAL 

/OONF 

/MOVF ANOTHER CONSTANT 



■-> p & r, r 


1 01 


•i 4 6 


2 Pi 4 5 4 1 


V 461 


247555 


'' 46? 


054541 


1 fr 4 6 3 


? 4 ."< 7 6 


■'6 464 


?47555 


A i- 4 6 5 


054 <76 


:'i< 466 


207J26 


0> 467 


247555 


.* f 4 7 


057.V76 


vl f 4 7 1 


207325 


'- 4 7 ? 


24755S 


i- 4 7 3 


057.V.:>5 


V 4 7 4 


7 5 A ■'. 


At 4 75 


7 4 1 


vl >. 4 7 6 


741100 


1' 477 


107250 



LAC 

mr 

LAC 

XOP 

RAC 

LAC 

XO« 

I1AC 

LAC 

XO^ 

OAC 

LAS 

RAI 

SPt 

JMS 

.EJ 



K1 «000 

K1 'K 

K1 ,1000*1 001' 

F 5 < 4 + 6 

K1 -'K 

F 5 3 4 + 6 + 10000 

TUN 

K 1 'K 

TT1 M+10000 

TTOUT 

K'_ >K 

TTnUT+1 0000 



PI MOT 
ECT 



/LOWFR 

/CHFCK FOR INHIBIT PI 
/INHIPITFD 



5A'>FV9 



9 pagf 


10? 


r 5 


206500 


i" 5 1 


507555 


0/ 502 


7 4 ? 


0*503 


7 4 10 


0/15714 


6?7"M 


06505 


760?07 


0*506 


1 7 2 1 


06507 


627307 



06510 


777777 


06511 


047633 


06512 


207317 


0651 3 


4 7 314 


0651 4 


606423 



^515 


0651 6 


0651 7 


06520 


6 5 2 1 


06522 


0*523 


065?4 


06525 


0*526 


06527 


0*530 


0*531 


0*532 


w*533 


0*534 


0*535 



147312 
207633 
50731 7 
4 7 6 3? 
207312 
547541 
606530 
54763? 
60644? 

44731? 
606521 
207555 
247633 
6064 43 

047642 
047643 
606536 



b G N A G N 



L a r . 

A NO K 1 'K 

S^A 

SKP 

JMP» ifi'.NHl 

I 6 W 2 SI ; 

JMS TLSSF 

JmP* ^ -Ml 



/SFF WHICH 4K 

/STA^T OVF.R IN H! 4K 
/ R Et_l 



/START In low 4 K 



/SFTUP TO HOVE T'l LOW 4K 

/ 

M V P K LAW I7777 

n AC WOWK3 

LAC K7777 

n AC MOvES 

JMP MOVR+2 
/ 
/ 

/ADJUST MEMORY RTF. INSTRUCTIONS, 00 NOT ADJUST IF 
/ADR. PORTtONrANY ADR. FROM TO 21. 
/ 



/OEST 'N 
/ S OijRCF 
/MOVF PROGRAM 



MR] NS 



/ 

SAV3 
SAV5 
SAy6 



0?M WOCNT 

I AC W0 r -K3 

AND K7777 

nAC W0 : -fK2 

I. AC WOCNT 

SAO K?9 

JMP .+5 

SAO W0RK2 

JMP MyRTN-1 

rs? WOCNT 

JMP .-6 

LAC K10K 

XOP WORKS 

JMP MVRTN 

DAC SAVAC 

A C R j m P 

JMP SRi/INT 
.FJECT 



/ADR. COMPARF WORD 
/INST. TO BE MODIFIED 
/CLEAR BITS 0-5 
/SAVF 

/UONF IF EQUAL TO 22 

/COMPARE 

/AOR. IS SOME REG. FROM 

/TO 21. MOVE WITHOUT AnjUSTING 

/ADR. COUNT+1 

/10000 

/adjust Inst. «y 10000 

/MOVF 

/THESE ARE MODIFIED FOR 
/RELOCATION 



p a r, E i ? 



^-5^6 

* 5 3 7 

i<! * 5 4 

;**54 2 
,1*54 3 
/ 5 4 4 
•A I 5 4 5 
(546 

3*547 
0*550 

V5*551 

i*552 
1*55 3 
0* 554 
'^6555 
0*556 
0*557 
0( 560 

■*561 



4*562 
'(563 
.a* 5 64 
^s * 5 6 5 
6 5 6 6 
0*567 
0*570 

0*5 7 1 
0*572 
6 5 7 3 

0*574 

^575 
0*57 6 

0*577 
3*600 
0*601 
0*602 
0*603 



7 c : 1 
741 000 
606575 
7 314 
741 1 00 
7 4 4 
2 7 6 3 f» 
740010 
7 4 110 

606636 
700 31 4 
507321 
740200 
1071 41 
7001 01 
741000 
606776 
700201 
606562 
626763 



744000 
207643 
7411 00 
744002 
5 7 6 01 

5 4 6 ■= .7 4 
740040 

20 7 642 
700042 

6 2 7 6 4 3 

00657? 

'00007 
547537 
741000 
6 65 75 
700004 
106621 
606562 



S R V I ' J T 



F643 



/ 

/SfRVICE ALL INTERRUPTS 

/ 

clsf 

SKP 

JMP CLKIMT 

I OPS 

SPA 

HALT 

LAC WOPK 

RAI 

SPA 

JHP TTYINT 

IORS 

ANO K1400 

S?A 

JHS RNFLG 

RSf 

SKP 

JMP REaDA 

PSF 

JMP RTMIT 

JMP* GOPNCH 



/rHFCK FOR PI FROM CLOCK 
/SOMF OTHER OEVICF 



/STATUS WORD BIT MUST = 
/FRR0R. RIT SET. PI OFF 



/SFF IF TTY IN USE AT TIME 

/OF PI 

/CONTINUF PRINTING 

/I/O STATUS WORD 

/CHEOK FOR NO TAPE FLAGS 
/EITHER READER OR PUNCH NO TAPF 
/CHECK FOR PI FROM REAOER 

/REAO MORE 
/CHECK PUNCH Pi 
/SOME OTHER DEVICE 
/PUNCH MORE 



/SETUP TO RETURN TO INSTRUCTION TEST 

/ 

PTNIT CLL 

I AC RJMP 

SPA 

STL 

AND K17S 

SAO ILINT 

HALT 



/C(0) AT PI 
/CHECK LINK 
/RESTORE LINK 



F644 



PI ON 

/ 

ILINT 

/ 

CLK INT 



LAC SAVAC 

ION 

JhP* RJMP 

P I ON 

I AC 7 

S A | , K 1 

S KP 

JMP .-3 

CLOF 

JMS CLKSET 

JMP RTNIT 

.EJECT 



/ERROR. PI OCCURRED AFTER LAC SAVAC 

/INSTEAD OF JMP * RJMP. 

/AC AT TIME OF PI 

/PI ON 

/CONTENTS OF (0) AFTFR Pi 



/LET CLOCK CONTINUE FOR 1/2 S£0 



/RESFT CLOCK TO RANDOM VALUE 
/RETURN TO INST. TFST 



-A'-FyO 
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/SFTiiP 

/ 

■-' F T r I K 


CLOCK V 


AU ! FS 






iAt 6 4 
^605 
■u 606 
?>6607 


300000 
1 061 02 
4 7 312 
507323 




JMS 
OAC 
AND 


GFkRAN 

wncMT 

K7/7 


/GET A 
/SAyF 
/MAX . 


NO. FOR CLOCK 
TIME = 9 SFCS. 


0661 

0661 1 

06613 
06613 


047312 
347324 
741 1 00 
606605 




I1AC 
TAI! 
SP* 
JMP 


WO!' NT 
Ml/- 7 

SETCLK+1 


/SAVF 
/ M I N . 
/POS. = 
/NEC. = 


TIMF = 2 SFC. 
2 SECS. OR MORF 
LESS THAN 2 SFC. 


06614 


20731 2 




l_ A 


W r N T 






06615 
06616 
0661 7 


740001 
040007 
700044 




CMA 

DAC 
OLOf> 


7 
1 


/PUT VALUE IN (7) 
/CLOCK ON 


06620 


6?6604 


/ 

CLKSFT 


JMP« 


i SFTCLK 


/EX I T 




06 621 
06622 


000000 

106133 



JMS 


RA?JGEN 




/GET A NO. FOR CLOCK 


06623 
06624 


047312 
507323 




oac 
and 


WOONT 
K777 


/SAVE 
/MAX. 


TIME = 9 SECS. 


06625 
■ 16626 
V\f 627 
06 630 


047312 
347324 
741100 
606622 




DAC 
TAD 
SPA 
JMP 


WOONT 
M167 

CLKSET+1 


/SAVF 
/MIN . 
/POS. 
/NEC 


TIME = 2 SFCS. 

= 2 SECS. OR MORE 

= t ESS THAN 2 SECS. 


06631 


207312 




I.AC 


w n c n T 






06632 
06633 
6 63 4 


740001 
040007 
700044 




CM A 
OAC 7 
CLON 


/PUT VALUE IN (7) 
/CLOCK ON 


0f 635 


626621 




JMP^ 


» CLKSET 


/FX IT 










.EJECT 







a-FV 



p a r, f 1 5 







/SF TUP 

/ 

T T Y IN T 


FOR RFAD, PUNCH 


''6^6 


507325 


LAC TT'UtT 


?. ft 6 3 7 


546701 




SAO F. NO OUT 


M ft ft 4 


606657 




jMP PRF AD Y 


ft 6 4 1 


2076?J0 




I AC WOiiK 


fl ft 6 4 2 


507530 




ANT) K.i 


0ft 643 


247557 




XOR K200K 


M ft 6 4 4 


047630 




OAC WORK 


0ft645 


7001 01 




RSF 


ft ft 4 ft 


741 000 




SKP 


0ft647 


740040 


f 64 5 


HAl T 


•A ft ft 5 


700201 




PSr 


0ft 651 


741 000 




SKP 


«ft 652 


740040 


F646 


HALT 


ft ft 5 3 


447325 




IS? TTOUT 


i*ft654 


??7325 




LAC* TTOUT 


06655 


700406 




TLS 


PI ft ft "5 ft 


60656? 


/ 

PRF AOY 


JMP RTNIT 


0*657 


147630 


02M WORK 


0*660 


147327 




n?M CMTA 


06661 


147330 




n?M cntB 


0ft662 


70040? 




TCF 


06663 


750004 




LAS 


06664 


507543 




AND KlK 


06665 


741 200 




SNA 


0*666 


606671 




JMP .+3 


06667 


700104 




RSA 


0ft670 


60656? 




JMP RTNIT 


0ft 671 


206763 




LAC GOPNCH 


0ft672 


741200 




SNA 


06673 


60670? 




JMP PNSTRT 


6 674 


7001 04 




RSA 


0ft675 


676763 


/ 

OATARL 


JMP* GOPNCH 


ft 6 7 6 


007357 


TTRUFA-1 


0ft677 


007443 


FNflBlN 


TTBUFA+63 


0ft700 


007443 


OlJTTdP 


ttRufb-i 


0* 701 


007527 


FNOOUT 


TTRUER+63 
.EJECT 



OR PRINT 



/IF FQUAL (,0 PUNCH AND READ 



/ERROR. 



READ FLAG UP 



/error. punch flag up 
/ttout = char. bin pointer 
/get char. from tty rim 
/print one character 
/return to inst. tfst 



/CLEAR TTY FLAG 



/TEST ACS 8 A 1 

/SELFCT READER 
/RETURN TO INST, 



TEST 



/0=1ST TIME THRU 
/START SFQUENCF 
/SELFCT READER 
/rONTINUF SEQUENCE 



<A^EX<? 
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/PUNCH DATA 




0*702 


107241 


/ 

PNST-T JMS 


C^l F 


0*703 


70040? 


TCP 




* 7 4 


7S0004 


t A<: 




S**705 


507546 


AMP 


K3K 


0*706 


741 ?00 


SNi 




3* 707 


60671? 


JMP 


, + "< 


0*71 


700?0? 


PCF 




0*711 


60656? 


JMP 


R T N I T 


0*712 


750000 


CLA 




0*713 


700104 


RSA 




0*71 4 


106763 


JMS 


GOPNCH 


0*715 


207333 


L A C 


K300 


0*716 


047335 


UAC 


STORE 


0*717 


447335 


PNXT IS? 


STORE 


0*720 


207335 


LAC 


Store 


0*721 


106763 


JMS 


GOPNCH 


0*722 


207336 


LAC 


SPCE 


0*723 


1.06763 


JMS 


GOPNCH 


0*7?4 


207335 


LAC 


STORE 


0*725 


547337 


SAO 


K332 


0*726 


741000 


SKP 




0*727 


606717 


JMP 


PNXT 


0*730 


207331 


LAC 


K2S7 


0*731 


047335 


DAC 


STORF 


0*732 


447335 


PNXTA IS? 


STORE 


0*733 


207335 


LAC 


STORE 


0*734 


106763 


JMS 


GO°NCH 


0*735 


207336 


LAC 


SPOE 


0*736 


106763 


JMS 


GO p NCH 


0*737 


207335 


LAC 


STORE 


0*740 


54733? 


SAD 


K271 


0*741 


741000 


SKP 




0*742 


60673? 


JMP 


PNXTA 


0*743 


207340 


LAC 


KCPLE 


0f 744 


047335 


nAC 


STORF 


0*745 


106763 


JMS 


GOPNCH 


0*746 


20733^ 


LAC 


ST ! 'rE 


0*747 


107?3? 


JMS 


R0IAT9 


0*750 


106763 


JMS 


GOPNCH 


0*751 


777770 


1 At-, 


-1 ' 


0*75? 


04733*! 


o«c 


STORF 


0*753 


750001 


CL" ! 


! C M a 


«/■ 754 


700010 


70001 


0*755 


7 4 ? 


S?* 




0*756 


740040 


F647 HALT 


0*757 


106763 


JMS 


GOPNCH 


0*760 


447335 


IS? 


STORF 


0*761 


606753 


JMP 




0*762 


606715 


JMP 


PNXT-2 






.EJECT 



/CR.LE 

/CLFAR TTY FLAG 

/MASK ACS 7 AND 8 

/IF FITHFR IS A 1, DON'T PUNCH 

/PUNCH DATA 

/CLEAR PUNCH FLAG. NO MORE 

/PI'S FROM PUNCH ShOULO OCCUR. 

/RFTURN TO INST. TFST 

/SELECT READER AND PUNCH 
/TO INITIATE SEQUENCE 



/PUNCH CHAR. IN AC 10-17 

/(SPCE)=240 

/PUNCH SPACE 

/DONF WITH ALPHABET IF EQUAL 
/PUNCH MORE CHARS. 



/(KCRLF)=CR,LF 
/PUNCH CR 

/ROTATF 9 RIGHT 
/PUNCH LF 



/AC = 777777 

/CLEAP AC WITH MB 14 

/FRROR. EVENT TIME 1 DIDN'T 
/CLEAR AC. 
/PUNCH 8 FRAMES OF 0'S 



/START NFW LINE 



•* F v •> 



p a r, k 107 



< '• 7 6 3 


000000 


r;OPN 'H ■* 




.1^76 4 


700204 


P S ■' 




06765 


7 5 4 


I. A< 




06 766 


507547 


and 


K4K 


If 767 


740700 


%ih 




"770 


60656? 


JMP 


R T N I T 


0' 771 


447327 


IS? 


CNTA 


6 7 7? 


707330 


LAC 


CNTB 


06773 


740700 


SZA 




06774 


607031 


JMP 


SU'U 


!6775 


6 656? 


JMP 


R T N I T 






/READ PUNCHED 

/ 

PEADA IAS 


INFO 


0' 776 


750004 




06777 


507546 


ANL 


K3K 


7 000 


740700 


S?A 




0/001 


6071 1 ? 


JMP 


RE*DB 


0700? 


750004 


LAS 




07003 


507547 


AND 


K4K 


07004 


741 ?00 


SNA 




37005 


607010 


JMP 


. * < 


07006 


7001 1? 


RPJ' 




07007 


60656? 


JMP 


RTNIT 


7 010 


7001 1? 


RRP 




0701 1 


740P00 


SZA 




0701 7. 


607017 


JMP 


?RONOT 


07013 


707327 


I AC 


CNTA 


0701 4 


740700 


S?A 




0701 5 


607031 


JMP 


SUHl 


17016 


6070P7 


JMP 


TAnoi 


07 17 


447326 


FRONOT IS? 


TTIN 


07070 


067326 


DAC 


» TTIN 


070?1 


20 7 3 26 


LAC 


TUN 


070?2 


546677 


SAn 


END8IN 


1 7 3 


607037 


JMP 


SETTY 


'0?4 


2073?7 


LAC 


CNTA 


07025 


7 4 7 00 


Sik 




07076 


6 7 31 


JMP 
/ 
TAOD1 IS? 


. + < 


! 0?7 


447330 


CNTR 


7 3 


60656? 


JMP 


RTNIT 


7 31 


777777 


SUB1 LAW 


-1 


0703? 


34 7377 


TAD 


CNTA 


07033 


047377 


flAC 


CNTA 


7 3 4 


14 7330 


n?M 


CNTR 


07035 


7001 04 


RSA 




07036 


60656? 


JMP 


RT-UT 



/MASK ACS 6 

/IE 4 1, nON'T USE CNTA OR CNTB 
/RETURN TO INST. TEST 
/CNTA=PUNCH SELECTED 

/0=WAIT FOR PI 
/1=SFLECT READER AGAIN 
/RETURN TO INST. TFST 



/MASK ACS 1 AND S 

/IF EITHER IS A 1, RFAD FULL SPEED 



/MASK ACS 6 

/IF A 1, CLEAR READER FLAG. NO 

/MORF PI'S FROM READER 

/CLFAR RFADER FLAG 
/RETURN TO INST. TEST AND 
/WAIT FOR PUNCH PI 
/REAn ONE 
/0=NO DATA IN READER YET 

/SEF IF PUNCH IS SELECTED 

/YES. SUBTRACT FROM CNTA 

/READER SELECTED 

/STORE CHAR. IN TTY RIN 



/CHECK FOR 52 CHARACTERS STORED 
/DONE. SETUP TO PRINT 



/RETURN TO INST. TEST 
/<CNTA)-1 

/RETURN TO INST. TEST 



.EJECT 



<AsFx9 



9 P 4 r, e 


10ft 


07037 


700201 


07040 


6 7 tfi 3 7 


3 7 41 


70020? 


7i7042 


700402 


'17 04 3 


2 7*11 


7 4 4 


547536 


07045 


607070 


07046 


4 4 7 311 


07047 


206676 


07050 


04 7 326 


07051 


206700 


07052 


047325 


07053 


447326 


07054 


227326 


07055 


447325 


07056 


067325 


07057 


207325 


07060 


546701 


07061 


741000 


07062 


607053 


07063 


206676 


07064 


047326 


07065 


206700 


07066 


047325 


07067 


606641 


07070 


20676* 


07071 


5471 11 


07072 


741000 


07073 


607047 


07074 


777772 


07075 


04 7311 


07076 


777777 


07077 


700010 


07100 


740200 


07101 


740040 


07102 


700204 


07103 


700201 


07104 


607103 


07105 


447311 


07106 


607076 


07107 


700202 


0711 


607047 



SETTy 



YFRl 



/ 

PUNft 



£648 



07111 



006760 



/ 

*6<»7 

/ 



, - 1 



PSf 
J M P 
PCF 
TCP 

LAC BRFAK 

SAC KIP A 

J MP p:jl6 

IS/ PtH AK 

I AT nATARL 

run TT IN 

l_AC nUTTOP 

DAC TT n UT 

IS? TT I M 
I AC* TTIN 

IS? TT'",UT 
DAC* TTOUT 

LAC TTOUT 

SAD ENHOUT 
SKP 

JMP XF«1 

LAC OATABL 

OAC TT!N 

LAC nUTTOP 

DAC TTf'UT 

JMP TTYINT+3 



/WAIT EOR PUNCH 

/CLEAR PUNCH FLAG 
/CLEAR TTY FLAG 



/RESTORE INPUT/OUTPUT POINTERS 
/READER TO BIN 

/PIN f n TTY 

/TRANSFER BUFFER A TO PUFFER B 



/DONF IF EOUAL TO TTBUFR+63 

/TRANSFER ANOTHER 

/RESTORE BUFFER POINTERS 

/TTBUFR-1 

/PEGIN PRINTING 



LAC GOPNCH 

SAP K647 /PUNCH 0*S ONLY *T ENO OF BLOCK 

SKP 

JMP XFP1-4 /(GOPNCH) N0T=E647+2 

LAW -6 

OAC RRFAK /FRAME COUNTER 



LAW -1 

700010 

SZA 

HALT 

PSA 

PSF 

JMP .-1 

IS? RRFAK 

JMP E6-18-3 

PCF 

JMP XF«i-4 

Fft47+? 
.EJECT 



/AC=777777 

/CLE'R AC WITH BIT 14 

/ERROR. MB14 OION'T CLEAR AC 
/PUNCH BLANK FRAME 



/OlEiP PUNCH FLAG 
/SETUP TO PRINT 



< a r y o 



I' AGE IMP 







/RI A. IB RDUTIivE IS USED ONLY 






/BY ACS 7 

/ 

I'E&CH 


OR 8, -iR BOTH, RFA 


11711? 


7^000-1 


I AS 


« 7 1 1 3 


507547 




AK| : K 4 » 


07114 


741200 




SNA 


07115 


6071 20 




JMP . + ' 


07116 


7001 12 




RRi< 


7H7 


606562 




JMP RTMIT 


07120 


7001 12 




RR« 


fl71?l 


741 20^ 




SNA 


07122 


6071 30 




JMP SEl ECT 


07123 


44 7326 




IS? TTIN 


071 24 


067326 




DAC» TTIN 


07125 


207326 




I. AH TTIN 


07126 


546677 




SAO EMflBlN 


07127 


60 71 32 




JMP .+< 


07130 


700104 


SELFCT 


RSA 


CM 31 


606562 


/ 


JMP RTNIT 


07132 


206676 


I.AC DATABL 


071 33 


047326 




nAC TTIM 


07134 


750004 




LAS 


07135 


507550 




AND K6K 


07136 


740200 




S2A 


07137 


60 7130 




JMP SELECT 


07140 


607042 


/ 

/SERVICE 

/ 

RNFLQ 


JMP SFTTY+3 






NO TAPE CONDITIONS 


7141 


000000 





07142 


507543 




AND K1K 


07143 


740200 




S?* 


07144 


607151 




JMP .+5 


07J45 


760320 




LAw 3 2 a 


37146 


247341 




XOR K520K 


07147 


047351 




DAC NTFLG+1 


07-J 50 


607153 




JMP OUTFLG 


0:151 


7 6 322 




LAW 322 


07152 


6071 46 


/ 


JMP .-4 


07153 


207350 


OUTELG 


LAC NTFLG 


07154 


4 7 312 




n Ar WqtNT 


07 t 55 


107241 




JMS CRI F 


07156 


44 7 312 




IS? WDCNT 


07157 


227312 




L A n » w n c N T 


07160 


741200 




SNA 


07161 


607166 




JMP CLRFLG 


07162 


107210 




JMS TLSSF 


07163 


107232 




JMS R0TAT9 


07164 


107210 




JMS TLSSF 


07165 


607156 




JMP OUTFLG*3 


07166 


107241 


CLRFI G 


JMS CRLF 


07167 


6271 41 




JMP» RmFLG 



WHEN PUNCH IS INHIBITED 
DER RUNS AT FULL SPEED. 



/MASK A[;S 6 

/IF A 1 , DON'T READ 

/CLFAR READER FLAG 
/RETURN TO INST, TEST 
/GFT CHAR. FROM BUFFER. 
/0 = NO DATA IN READER YET. 

/SELECT READER AGAIN 
/BUFFER POINTER +1 
/STORE CHAR. IN TT9UFA 

/CHE^K FOR 52 CHARS. STORE" 
/TTBllFA IS FULL 
/SELECT READER 
/RETURN TO INST. TEST 



/RESTORE TTBUFA POINTER 

/MASK ACS 6 AND 7 

/IF FITHER A 1. OON'T PRINT 

/SELECT READER AGAIN 
/SETUP TO PRINT 



/CHF<^K FOR READER NO TAPE 

/READER 
/PUNCH NO TAPE 



/PRINT R OR P NO TAPE 
/READER NO TAPE 



/CR,I F 



/CR.I F 

/RETURN TO SEQUENCE 



<A'-F*9 
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•EJECT 



PAGE 111 







/PUNHH i 

/ 

PNI F R 


FADE*' 




17170 


000t-'0ffl 







7 \ 7 1 


777440 




I. A' 


-340 


'17? 


04731 ? 




OAC 


WOC NT 


7 1 7 3 


750000 




CL'« 




07174 


700204 




PSA 




07175 


700201 




PSf 




07176 


6071 75 




JMP 


. - 1 


07177 


4 4 7 312 




IS? 


WtV'NT 


07200 


6071 74 




JMP 


. - <! 


07P01 


6271 70 


/ 

PNMARK 


JMP» PNLEDR 


' ? 2 


000000 







7?03 


777777 




L A w 


-1 


07204 


700204 




PSA 




07205 


700201 




PSf 




07^06 


607205 




JMP 


. -1 


07207 


627202 




JMP. 


PMMARK 








.EJECT 



/EXIT 



iA^E*? 
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/PRINT A CHAPACUR 
/ 



07210 
07211 

07212 
07213 
07214 
07215 
07216 
07217 
07220 
07221 
07222 
07223 
07224 
07225 
07226 
07227 
07230 
07 231 



07232 
07233 
07234 
07235 
07236 
07237 
07240 



07241 

07242 
07243 
07244 
07245 
07246 
07247 



000000 
047315 
207630 
740010 
7401 00 
60 7 2 20 
700401 
607216 
207315 
700406 
700401 
60722? 
207630 
740010 
740100 
70040? 
207315 
627210 



000000 
742020 
742020 
742020 
7420?0 
740020 
62723? 



000000 
760215 
107210 
547246 
6?7?41 
76021? 
607?43 



TLSSi 





lur: moved 

| AC WOi'K 
rAI 



+ 3 



/ 

/ROTATE 

/ 

R0TAT9 



SMA 

JMP 

TSF 

JMP .-1 

LAC MOVED 

TLS 

TSF 

JMP ,-1 

LAC WORK 

RAL 

SMA 

TCE 

LAC MOVED 

JMP* TI.SSF 

9 RIGHT 



/CHFCK TTY FLAG 
/WAIT FOR FLAG 

/CLEAR TTY IF BIT 1 = 





rtp; 



rtr; 
jmp» 



RTR! 

RAR 

R0TAT9 
/ 

/CARRIAGF RETURN, LINEEEFD 
/ 
CRLF 

LAW ?15 

JMS TLSSE 

SAO .+? 

JMPo CRLF 

LAW ?i? 

JMP CRI F + 2 

.EJECT 



RTR 



/CR 



/EXIT 
/LF 



-F*Q 
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/PR I NT ' 

/ 

PINOT 


•r:OMPI ETE" 


■.«7?C0 


000000 





07251 


207634 




LAP W0PK4 


C"7?«>2 


547536 




SAO K12A 


07253 


74 1 000 




SKP 


7 254 


627250 




JMP» P'NOT 


7 255 


1 47634 




f'jZK W0RK4 


7 266 


157634 




l)i?M W0WK4+1 0000 


07257 


207273 




LAP COMPA 


07260 


040014 




D A C 14 


07261 


107241 




JMS CRI F 


07?62 


220014 




LAC* 14 


7 263 


741 200 




SNA 


07264 


607271 




JMP . +k 


07265 


107210 




JMS TLSSF 


•27266 


107232 




JMS R0TAT9 


517267 


107210 




JMS TLSSF 


«7270 


607262 




JMP .-6 


07271 


107?41 




JMS CRLF 


'.17272 


627250 


/ 
COMPA 


JMP» PINOT 


^7?73 


007342 


COMP 








.EJECT 



/PASS COUNTER 

/PRINT IF EQUAL TO 10 

/START PROGRAM 



/PRINT COMPLETE 

/DONF PRINTING IF 

/PRINT 1 CHAR 

/PRINT 2ND 
/GET NFXT PAIR 
/CR, LF 



<A'-;f*9 
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7 ? 7 4 
7 2 7 5 
07276 
3 '''2 7 7 
37300 

■3 7301 

517 302 
7 30 3 

07304 
7 3 pi 5 

7 3 06 
07307 

7 310 

07311 

7 312 
7 313 
7 314 
07315 
7 3 1 6 
7317 
07320 
37321 
'1 7 3 2 2 
7 32 3 
07324 
07325 
07326 
7 3 2 7 
07330 
07331 
07332 
07333 
07334 
07335 
7 3 3 6 
07337 
07340 
-'341 



75252^ 



000000 

000000 

037700 
740076 
037701 
7 4 0077 
037700 

3 
000000 
000070 
010070 
000000 
000000 
777776 
000000 
000000 
777777 
007777 
10 00 
001. 400 
5 
7 7 7 
7 7 7 611 
000000 
000000 
000000 

000000 

000257 
000271 
000300 
000301 

000000 

000240 
3 32 
21 221*5 

5 2 



CONSTANT TAULF FOR CHF CKEPfiO ARn A * 
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PI 



i h n a 

01 6 
C12- 
L (-•("!. 
PAT 



PAT 
ATR 
ATW'i 
GMU) 
G N H I 
RFAK 
DC NT 
C25 6 
OVES 
nVF' 
IT SUP 
7777 

1 00K 
14 0/; 
5 ,< 

777 

167 

TOUT 

TIN 

NTA 

NTB 

257 

271 

300 

301 

TORE 

PCE 

332 

CF'LF 

5 '-> ■< 



752525 







037700 

7 4 7 6 

037701 

7 4 7 7 

3 7 7 



SEOuFN 

SEOUFN+1000C 





7 7 7 7 7 6 



777777 

7777 

1 F 

1400 

=.00000 

777 

777611 







257 

271 

3 00 

301 



240 

3 3? 

212215 

5 20 
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/"fOMPl tTE" 
/ 

COMP 




'-17 3,5? 


0073 4 2 




51 '' 3 4 3 


31 7.303 


317303: 


320315; 


7 3 4 4 


320315 






7 3 4 5 


3515314 






517346 


305374 






7 3 4 7 


000(100 


/ 

/R OW P NO TiPE 

/ 

MTFLi, 










0! 7 3 5 


007 x 50 




07351 


000000 







7.35? 


317316 


31731 6: 


324240; 


07353 


324240 






07354 


320301 






07355 


240305 


240305: 


207207 


07356 


207707 






^7357 


000000 








07360 
07444 



305314; 



305324; 



320301 



/ 

/TTY BIN 
/ 

TTBUFA .BLOCK 64 
/ 

TTRUFB .BLOCK 64 
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/CONSTANT 
/ 


AND FR> 


7 530 


00 





07531 


01 


r 1 


1 


07532 


0? 


X? 


? 


07533 


4 


K4 


4 


7 5 3 4 


.40001 


Kl!' 


10 


517535 


00001.1 


i',11 


11 


7 5 3 6 


001? 


M?A 


12 


07537 


0001 00 


"10 


100 


7 5 4 


000070 


* ?'■■' 


70 


07541 


0000?? 


■*?? 


22 


7 5 4 2 


000040 


« 4 


4 


07543 


3 010 00 


K IK 


1 000 


7 5 4 4 


000400 


K 4 


4 00 


07545 


007000 


K?K 


7000 


37546 


003000 


K3K 


3000 


07547 


004000 


K4K 


4000 


07550 


006000 


K&K 


6000 


7 551 


000?00 


K?00 


?00 


0755? 


040000 


K40K 


40000 


07553 


400000 


H400h 


4 00 


7 5 5 4 


40000? 


K40?* 


40000? 


07555 


010000 


* 1PK 


1 0000 


07556 


0?0000 


K 9 K 


? 


07557 


700000 


K700K 


?00000 


07560 


600000 


K600K 


600000 


07561 


700000 


K 700K 


700000 


07562 


00?021 


K20 2". 


?0?1 


07563 


3(52120 


K21 2 * 


?1?0 


07564 


111111 


KlS 


111111 


07565 


?????? 


K?S 


?2?222 


07566 


333333 


K3S 


333333 


517567 


444444 


K4S 


444444 


07570 


555555 


K5S 


555555 


37571 


666666 


K6S 


666666 


07572 


777777 


K7S 


777777 


07573 


011111 


K51S 


11111 


07574 


01 ??2? 


K1.2S 


1??2? 


07575 


01 3333 


*1 3S 


1 3333 


7 5 7 6 


01 4 4 4 4 


«14S 


14444 


07577 


015555 


»15S 


15555 


7 600 


016666 


K-16S 


16666 


07601 


•01 7777 


K17S 


1 7777 


7 6 0? 


00?5?5 


x?5?5 


?5?5 


7 60 3 


00575? 


K5?5? 


5?52 


7 604 


?5?5?5 


K010 


?5?5?5 


7 6 5 


5?5?5? 


CI 01 


52525? 


7 6 6 


5?5?53 


"53 


5?5?53 


07607 


077777 


K3 7S 


077777 
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7 610 


70004? 


0761 1 


70000? 


0761 2 


76000? 


07613 


10000? 


H7614 


60400? 


07615 


34400? 


37616 


741 000 


5)761 7 


750000 


07620 


777776 


076?1 


777773 


076?? 


777737 


07623 


777377 


07674 


773777 


076?5 


737777 


076?6 


377777 


076?7 


000000 


07630 


000000 


07631 


000000 


0763? 


000000 


07633 


000000 


07634 


000000 


07635 


000000 


07636 


000000 


07637 


000000 


07640 


740010 


07641 


740001 


07642 


000000 


07643 


000000 


07644 


4P0015 


07645 


777777 


07646 


120015 


07647 


740040 


07650 


62001? 


07651 


200000 


07652 


741400 


07653 


740400 


07654 


123156 


07655 


654321 


07656 


361416 


07657 


055363 


07660 


546060 


07661 


243035 


07662 


76257? 


07663 


453237 


07664 


150214 


07665 


000000 



k 7 X 4 '-' 


70004? 


k 7 X X ? 


700002 


K 7 6 X ■> 


76000? 


K1XX? 


1 00002 


K 6 X 4 -> 


60400? 


K344X? 


34400? 


KSKP 


SKP 


KCLA 


CI* 


f-'-l 


777776 


M4 


777773 


"40 


777737 


M400 


777377 


M4K 


773777 


M40K 


737777 


M400K 


377777 


/ 

PJCNT 





WORK 





WORK1 





WORK? 





WORK 3 





WORM 





I IAD" 





AUTNOT 





TCLK 





XCTRAL 


RAL 


AUTCMA 


CHA 


SAVAC 





RJMP 





LAWAUT 


XCT» 15 


LAWFUL 


LAW 17777 


JMSAUT 


JMS» 15 


KHALT 


7 400 40 


JMPAUT 


JMP» 1? 


SAV4 


LAC 


KS?L 


741400 


KSNL 


740400 


RANCON 


123456 


RANTHL 


6543?! 




361416 




055363 




546060 




?43035 




76257? 




453237 




150214 
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07666 
07667 
07670 
7 6 71 
■0 7 6 7 2 
97673 
07674 
517675 
07676 
07677 
07700 
07701 
7 70? 
07703 
07704 
07 705 
07706 
07707 
07710 
7 711 
07712 
7 713 

7 714 
M7715 
0771 6 
0771 7 
07720 

07721 
07722 
07773 
07724 
7 7?5 
077?6 
07727 



000000 
000000 
000000 
'100 00 
000000 

000000 
000000 
000000 
000000 
000000 
000000 

000000 

000000 

000000 

000000 

000000 

000000 
000000 

000000 
000000 

000000 

000000 

000000 
000000 
000000 

000000 

000000 

000000 

000000 
000000 
000000 

000000 
000000 

752525 

000000 



/ERR 

/ 

JMPRFT 

Jill 

J2?2 

J333 

J 444 

J555 

J66 6 

J777 

J5?5 

J?52 

CAL0 

CAll 

JSM71 

JSM7^ 

JSM7 < 

JSM74 
JSM75 
JSM76 
JSM77 
JS25? 

JSSS 

/ 

XCT11 

XCT 12 

XCT13 

XCT17 

XCT125 

/ 

JST77 

JST66 

JST55 

JST44 

AUTJ^P 

AUTjMS 



1R TABLES 



/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/JMP 
/CAL 
/CAL 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 
/JMS 



2? 

1111 

122? 

1333 
1444 
1555 
1666 
1777 
1525 
1252 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
FROM 
SFRI 



(F5i-'9) 

( F 5 1 V ) 

(F511 1 ) 

(F51 ?) 

( F 5 1 3 ) 

(F51 4 ) 

(F51 5) 

(F51 6) 

(F517, 
17757 FXT, 
1 7757 
7 7 7 7 
07776 
07775 
07774 
07773 
0777? 
07771 
12525 
1525? 
ES TFST 



LINK : (E518) 



L INK r 1 



TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 
TO 



11111 
12222 
13333 
14444 
15555 
16666 
17777 
15252 
1?5?5 



(F52!1) 
(E522) 
(F5?4) 
(E526) 
(E528) 
(E530) 
(F532) 
(E534) 
(E536) 
(E538) 



(E540) 



/XCT J^S- r ROM 11111 XCT (16666) (F562) 
/XCT JMS. FROM 12222 XCT (15555) (F564) 
/XCT JMS. FROM 13333 XCT (14444) <F566> 
/XCT J.S FROM 07776 XCT (17776) (E568) 
/XCT JMS. FROM 12525 XCT (15252) 



/JMS» 

/JMS° 

/JMSo 

/JMS* 

/JMP» 

/JMS» 

752525 

.EN'O 

MO ERROR LINES 



07777 (F592) 

16666 (F594) 

15555 (E596) 

14444 (E59R) 

12 (AUTO-INDEX) (E620) 

17 (AUTO-INOFX) (E633) 



p 4 r, f ti9 



.,q: ATS 


02530 


.Oi'Ar 


'* 1 5 7 4 


-nnArl 


01 77? 


- n f n n <'i 


/i 3 :< a 


■ n MKT 


Sift 31 2 


■ -. MhPp j 


02571 


.M«SI1M 


03075 


.. m 1 M q B 


07433 


■.Mf'SRT 


07467 


■ Mi 'AH 


0130ft 


■v N i = T 


0551 7 


'■-.mi- r, 


0301 7 


■tPI SRT 


7 4 5 4 


API USB 


0241 7 


•>pns 


3016 


■•,Uf JMP 


06101. 


•vLUCMA 


07641 


<UJ! JMP 


07775 


•HJTJMS 


07796 


.» U t n n T 


07636 


aUtoin 


055?0 


-in p. 


05665 


-UTRFT 


06077 


•JJTRF< 


05777 


■ UTR.IM 


06100 


-i n a t a 


06354 


•,F<; in 


00023 


-IG" AGN 


06500 


•G-H! 


07310 


<GM.n 


07307 


<I ,; ETU 


03036 


( I TSIIP 


07316 


^TTS-i 


03055 


■ffTTS? 


03070 


-jM/iMRT 


02543 


(Mi sum 


0307 4 


<M 1 NSA 


02425 


iMWS»T 


02515 


-Nt'G 


03021 


<P'S 


03070 


H R i-" A K 


07311 


■:ai 


07700 


■;ai t 


07701 


OHKRRO 


06154 


;ki onp 


06363 


;ki p 


0301 1 


:Kf"0 


06126 


■. : L K I w T 


06575 


:lksfT 


06621 


•;u:-f 


700004 


.:LfiN 


700044 


a«fi r, 


07166 


clsf 


700001 


ONTA 


07327 


CNTR 


07330 
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:r>:~p 


0734? 


:n-'P4 


07273 


:o r - -rn r . 


02767 


;pi f 


07241 


>Ai:Ar 


03341 


IA r API 


06676 


»R-y 


002H4 


!«'■ XX 


002H7 


IR'<XXX 


00215 


)?"Ar 


03222 


►.NOR IN 


06677 


- N-'OHT 


06701 


KNDTBL 


06124 


■r.NTST 


06406 


-_R*OB 


06340 


-•1. 


00002 


■- 1 1 3 


00644 


r-11 4 


00671 


■■- 1 1 5 


00705 


'116 


00721 


- 1 1 


00747 


-141 


00775 


> : 1 4 2 


0101 2 


'14 3 


01027 


'■1*2 


01033 


'-1*3 


01037 


<-; i h 4 


01 043 


■r 1/S5 


01047 


Ki*6 


01053 


r 167 


01057 


cf>8 


01063 


t1*9 


01067 


''170 


01072 


^-2' 6 


01103 


•.2-7 


01106 


r?»>8 


0111 1 


.; ?^9 


01114 


►-21 


01117 


•21 1 


01121 


> 212 


01125 


t 2 1 3 


01130 


- 214 


01133 


-215 


01136 


-216 


01141 


"•-217 


01144 


'218 


01146 


c?i 9 


01153 


r. 2 2 


01155 


r.??1 


01162 


-222 


01 164 


--223 


01171 


t-224 


01173 


c.2?5 


01 200 


'-226 


01202 


t?4 


00140 



>A^FY9 


PACE 121 


?h 


00144 


■■ 2-K 


0121 2 


2~9 


1214 


- ?r, 


« 015 


- ?'-0 


01 220 


-'?''! 


«1 222 


- p/.. ? 


01226 


• 263 


012 3 


f ?64 


01234 


r 265 


01236 


-.266 


01243 


-267 


01245 


'-?i-6 


01252 


I- ?*9 


01 254 


••2' 


00154 


' 270 


01261 


' 2'1 


01263 


'2/2 


01270 


"273 


01301 


r ?74 


01311 


. 2'5 


01315 


-2 76 


01321 


-- 2 7 7 


01326 


'?/» 


01342 


-2 7 9 


013 4 4 


• 2"- 


001 64 


' 2'0 


01354 


'-2i1 


01361 


-2«2 


01366 


'-2" 3 


01372 


" 2«4 


01405 


--2*5 


01415 


'-■ 2«6 


01417 


- 2«7 


01424 


• 2*8 


01426 


, ?«9 


01433 


' 29 


00170 


- 2^0 


01435 


_29t 


01443 


--?''' 2 


01445 


--?->3 


01451 


--2^4 


1 4 5 3 


'-2'-. 5 


01457 


-- 2 -' 6 


01461 


t?9 7 


01467 


L2^8 


01471 


L2«9 


01477 


t-"3''" 


00174 


^3''0 


01501 


r:si'i 


0151 1 


t302 


0151 7 


t-3'3 


01531 


,-:3 ! /4 


01533 


H.305 


01541 


t3*6 


01543 



■1A--FV9 


PiHF 1?? 


- .3 '7 


5)1 5S1 


'-3;' 8 


01553 


:- 3 '' 9 


31561 


--31 


00200 


- 31 


911563 


-.311 


01571 


--31? 


01573 


-- 3 1 3 


01601 


-314 


01603 


-- 3 1 5 


01611 


-316 


0161 3 


-3i 7 


016P1 


>- 3 i 8 


016P3 


•: 3 1 9 


01631 


- 3- 


00??7 


- 3 '> 


01633 


-321 


01642 


t3?2 


01644 


f 3?3 


01653 


K3?4 


01655 


t3?5 


01664 


*■ 3 ? 6 


01666 


r- 3?7 


01675 


t3?8 


01677 


t3?9 


01706 


--33 


00232 


£330 


0171 


'-:331 


01717 


t332 


01721 


t333 


01730 


t-33 4 


01732 


t-335 


01741 


t336 


01743 


£337 


01752 


■-.338 


01754 


t339 


01763 


t34 


00236 


e 3 4 


01 765 


K34 7 


02000 


1-348 


0200? 


c349 


0201 1 


'-35 


00241 


--3*1 


0201 3 


3^1 


0202? 


--35? 


0?0?4 


".3=5 3 


02033 


-354 


02035 


-. 3 5 "5 


02044 


r-356 


02046 


►. 357 


02055 


^3sa 


0P057 


--359 


02066 


-36 


00245 


-: 3^0 


02070 


> 3 *> 1 


02077 



< 4 ' - F V 9 


PAGE 1?3 


- 3-2 


02101 


■ 3 ' 3 


« 2 1 1 'A 


- 3 •'• 4 


: 3211 ? 


3*5 


? 1 ? 1 


-3*6 


02123 


- 3 - 7 


? 1 3 ? 


3"B 


02134 


-.3*- 9 


02143 


- 3 1 


00250 


•3/0 


02145 


'-. 3 ' 1 


02154 


-. 3 7 2 


02156 


r 373 


02165 


-- 3 7 4 


02167 


<- 375 


02176 


^-3 76 


02200 


' 3/7 


022«7 


t\V8 


0221 1 


' 379 


02220 


'-3« 


510254 


>■ 3*0 


02222 


- 3M 


02231 


' 3«2 


02233 


r-3*3 


02242 


■: 3*4 


02244 


>--3*5 


02253 


> 3*6 


02255 


'-3*7 


02264 


<■ 3*8 


02266 


- 3*9 


02275 


- 39 


00257 


■ 3^0 


02277 


- 371 


02306 


•-.392 


02310 


-3^3 


0P316 


-.394 


02320 


-395 


02326 


-3^6 


02330 


-3 9 7 


02336 


' 3^8 


02340 


3*9 


02353 


- 4 ' 


00262 


r'4-'.0 


02355 


,.4-'l 


02461 


•„4'-'2 


02465 


-. 4 •/ 3 


09474 


>■. 474 


02500 


t4("5 


02507 


r 4*6 


0251 3 


'4'/'7 


02535 


-.4^8 


02541 


-. 4 '/ 9 


02550 


t41 


00265 


L 41 


02554 


--41 1 


02563 
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t 4 1 2 


02567 


t. 4 1 3 


02576 


'414 


02602 


■ 4 1 5 


0261 


i-416 


0261 4 


-417 


02624 


-_4 1 8 


02630 


--4 1 9 


02641 


4V 


00271 


r 4 - PI 


02645 


'4^1 


02657 


- 4 ■ ? 


02663 


'4-3 


02676 


-4-4 


02702 


£ .4'->5 


02716 


£4^6 


02722 


L4>7 


02737 


£ 4 9 8 


02743 


£499 


02761 


f 4 3 


00274 


£ 4 .S PI 


02765 


■ 431 


03062 


-439 


03066 


£4 '3 


03075 


t 4 3 4 


03101 


r 4 3 5 


03123 


K436 


03126 


£ 4 3 7 


03131 


£438 


03135 


£4 39 


03142 


t!4 4 


00300 


t440 


314 6 


£441 


03152 


£ 4 4 2 


03157 


£4 43 


03176 


£444 


03215 


£445 


03226 


£446 


03233 


<■' 4 4 7 


03240 


£4 48 


03245 


'-449 


03252 


t 45 


00303 


££ 4 *5 C 


03257 


'. 4 £ 1 


03264 


•-4-5J 


03271 


£45 3 


03276 


- 454 


03303 


-'4 £5 


0331 1 


u.4S6 


0331 3 


£45 7 


03316 


-.458 


03396 


-£459 


03334 


-.4f 


00307 


-. 4 A 


03345 


£4'i1 


03352 
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' 4 r, E IPS 



4> 2 


03357 


41,-? 


'3364 


4- 4 


''3371 


4^"5 


3 3 7 6 


4-6 


3 4 3 


41,7 


'i 3 4 1 


4'-fl 


3 4 1 5 


41 9 


034?7 


4' 


0031 3 


4 70 


034^7 


4 71 


3 4 5 


47? 


03454 


4 73 


3 4 6 1 


474 


03465 


475 


3 4 7? 


476 


03476 


477 


350 3 


478 


03507 


479 


3514 


4« 


0031 6 


4<'0 


03520 


4^-1 


03525 


4np 


03531 


4-3 


03536 


4-4 


03541 


4»5 


35 4 6 


4H6 


03551 


41-7 


03556 


4>>8 


03561 


4*9 


3 5 6 6 


4v 


00392 


4>'i0 


03571 


4 w 1 


03576 


41? 


360 1 


4 '3 


03606 


4 >4 


0361 1 


4'i5 


03616 


496 


03621 


497 


03626 


4«8 


03631 


4-9 


03636 


5 7 


00325 


50 


03641 


5*1 


03661 


5^2 


03671 


503 


3 715 


504 


03723 


5i'-5 


03731 


5- i 6 


3 7 4 


5/7 


03747 


508 


03776 


50 9 


04004 


51 


00330 


51 f 


0401 5 
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04026 
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00335 


■5^0 
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r5?5 
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c-5>7 
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04323 
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04347 
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'•15 36 
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t- 5 3 7 
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€53.8 
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1 5 s 9 


04457 


f 54 


00347 
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t541 


04465 


€54? 


04467 


L543 


04471 


r-544 


04475 


L5-5 


04505 


f 546 


0451 4 


"547 


04523 


•.5*8 


045.31 


L 5 1 9 


04603 


-5^ 


00355 


'_ 5 5 


0/1606 


- 5~1 


0461 3 


"-55? 


04615 


'55 3 


0461 7 


- 554 


04623 


' 555 


4 6*0 


-556 


4 6 34 


- 5 U 7 
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